[Home] [Help]
PACKAGE: APPS.RLM_CORE_SV
Source
1 PACKAGE RLM_CORE_SV AUTHID CURRENT_USER as
2 /* $Header: RLMCORES.pls 120.2 2006/04/17 18:31:27 rvishnuv noship $ */
3 /*===========================================================================
4 PACKAGE NAME: rlm_core_sv
5
6 DESCRIPTION: Contains common routines required by Release
7 Management.
8
9
10 CLIENT/SERVER: Server
11
12 LIBRARY NAME: None
13
14 OWNER: JHAULUND
15
16 PROCEDURE/FUNCTIONS: debug
17 enable_debug
18 disable_debug
19 debug_enabled
20 get_debug_levels
21 print_debug_stuff
22
23 ===========================================================================*/
24 TYPE t_dynamic_tab IS TABLE OF VARCHAR2(300) INDEX BY BINARY_INTEGER;
25 TYPE t_Cursor_ref IS REF CURSOR;
26
27
28 TYPE t_DebugLevels IS TABLE OF NUMBER
29 INDEX BY BINARY_INTEGER;
30
31 TYPE t_TimeType IS RECORD(
32 Marker VARCHAR2(100),
33 Time NUMBER,
34 CallCount NUMBER,
35 TotalTime NUMBER);
36
37 TYPE t_TimeStack IS TABLE OF t_TimeType
38 INDEX BY BINARY_INTEGER;
39
40 TYPE t_CallStack IS TABLE OF VARCHAR2(40)
41 INDEX BY BINARY_INTEGER;
42
43 TYPE t_NumberTable IS TABLE OF NUMBER
44 INDEX BY BINARY_INTEGER;
45
46 g_TimeStack t_TimeStack;
47 g_CallStack t_CallStack;
48 g_DebugLevels t_DebugLevels;
49 g_MaxLevels NUMBER := 31;
50 g_Debug BOOLEAN := FALSE;
51 g_DebugAll BOOLEAN := FALSE;
52 g_FileHandle utl_file.file_type;
53 C_FILE NUMBER := 1;
54 C_PIPE NUMBER := 2;
55 C_SCREEN NUMBER := 4;
56 C_SQLTRACE NUMBER := 8;
57 C_DELIMITER VARCHAR2(5) := ' ==> ';
58 C_FILLER VARCHAR2(1) := '-';
59 C_DEBUG_PIPE VARCHAR2(30) := 'RLM_DEBUG_PIPE';
60 C_PIPE_SIZE NUMBER := 1000000;
61 C_DEBUG_PROFILE VARCHAR2(30) := 'RLM_DEBUG_MODE';
62 C_PREFIX VARCHAR2(15) := 'rlmdebug';
63 E_PIPE_FAILURE NUMBER := -20000;
64
65 C_LEVEL1 NUMBER := 16;
66 C_LEVEL2 NUMBER := 32;
67 C_LEVEL3 NUMBER := 64;
68 C_LEVEL4 NUMBER := 128;
69 C_LEVEL5 NUMBER := 256;
70 C_LEVEL6 NUMBER := 512;
71 C_LEVEL7 NUMBER := 1024;
72 C_LEVEL8 NUMBER := 2048;
73 C_LEVEL9 NUMBER := 4096;
74 C_LEVEL10 NUMBER := 8192;
75 C_LEVEL11 NUMBER := 16384;
76 C_LEVEL12 NUMBER := 32768;
77 C_LEVEL13 NUMBER := 65536;
78 C_LEVEL14 NUMBER := 131072;
79 C_LEVEL15 NUMBER := 262144;
80 C_LEVEL16 NUMBER := 524288;
81 C_LEVEL17 NUMBER := 1048576;
82 C_LEVEL18 NUMBER := 2097152;
83 C_LEVEL19 NUMBER := 4194304;
84 C_LEVEL20 NUMBER := 8388608;
85 C_LEVEL21 NUMBER := 16777216;
86 C_LEVEL22 NUMBER := 33554432;
87 C_LEVEL23 NUMBER := 67108864;
88 C_LEVEL24 NUMBER := 134217728;
89 C_LEVEL25 NUMBER := 268435456;
90 C_LEVEL26 NUMBER := 536870912;
91
92 -- all non-core attributes are disabled
93 k_no_key VARCHAR2(1) := '0';
94
95 -- deafault match_key: all non-core attributes enabled
96 k_default_match_key VARCHAR2(80) := 'ABCDEFGH';
97
98 TYPE t_Match_rec IS RECORD(
99 cust_production_line VARCHAR2(1) := 'N',
100 customer_dock_code VARCHAR2(1) := 'N',
101 request_date VARCHAR2(1) := 'N',
102 schedule_date VARCHAR2(1) := 'N',
103 cust_po_number VARCHAR2(1) := 'N',
104 customer_item_revision VARCHAR2(1) := 'N',
105 customer_job VARCHAR2(1) := 'N',
106 cust_model_serial_number VARCHAR2(1) := 'N',
107 cust_production_seq_num VARCHAR2(1) := 'N',
108 industry_attribute1 VARCHAR2(1) := 'N',
109 industry_attribute2 VARCHAR2(1) := 'N',
110 industry_attribute3 VARCHAR2(1) := 'N',
111 industry_attribute4 VARCHAR2(1) := 'N',
112 industry_attribute5 VARCHAR2(1) := 'N',
113 industry_attribute6 VARCHAR2(1) := 'N',
114 industry_attribute7 VARCHAR2(1) := 'N',
115 industry_attribute8 VARCHAR2(1) := 'N',
116 industry_attribute9 VARCHAR2(1) := 'N',
117 industry_attribute10 VARCHAR2(1) := 'N',
118 industry_attribute11 VARCHAR2(1) := 'N',
119 industry_attribute12 VARCHAR2(1) := 'N',
120 industry_attribute13 VARCHAR2(1) := 'N',
121 industry_attribute14 VARCHAR2(1) := 'N',
122 industry_attribute15 VARCHAR2(1) := 'N',
123 attribute1 VARCHAR2(1) := 'N',
124 attribute2 VARCHAR2(1) := 'N',
125 attribute3 VARCHAR2(1) := 'N',
126 attribute4 VARCHAR2(1) := 'N',
127 attribute5 VARCHAR2(1) := 'N',
128 attribute6 VARCHAR2(1) := 'N',
129 attribute7 VARCHAR2(1) := 'N',
130 attribute8 VARCHAR2(1) := 'N',
131 attribute9 VARCHAR2(1) := 'N',
132 attribute10 VARCHAR2(1) := 'N',
133 attribute11 VARCHAR2(1) := 'N',
134 attribute12 VARCHAR2(1) := 'N',
135 attribute13 VARCHAR2(1) := 'N',
136 attribute14 VARCHAR2(1) := 'N',
137 attribute15 VARCHAR2(1) := 'N'
138 );
139
140
141 /*===========================================================================
142 CONSTANTS : Process Statuses
143
144 DESCRIPTION: The following constants are created for process Status
145 throughout RLMDSP
146
147 CHANGE HISTORY: Ashwin Kulkarni Created 3/5/99
148 ===========================================================================*/
149
150 k_PS_AVAILABLE NUMBER := 2;
151 k_PS_IN_PROCESS NUMBER := 3;
152 k_PS_ERROR NUMBER := 4;
153 k_PS_PROCESSED NUMBER := 5;
154 k_PS_FROZEN_FIRM NUMBER := 6;
155 k_PS_PARTIAL_PROCESSED NUMBER := 7;
156
157 k_PROC_ERROR NUMBER := 0;
158 k_PROC_SUCCESS NUMBER := 1;
159
160
161 /*===========================================================================
162 PROCEDURE NAME: get_debug_levels
163
164 DESCRIPTION: This procedure retrieves debug levels for the debug value
165 passed.
166
167 PARAMETERS: x_Topper IN NUMBER
168
169 DESIGN REFERENCES:
170
171 ALGORITHM:
172
173 NOTES:
174
175 OPEN ISSUES:
176
177 CLOSED ISSUES:
178
179 CHANGE HISTORY: Jon Haulund Created 7/25/97
180 ===========================================================================*/
181 PROCEDURE get_debug_levels (x_Topper IN NUMBER);
182
183
184 /*===========================================================================
185 FUNCTION NAME: level_defined
186
187 DESCRIPTION: This function true if the passed level is defined.
188
189 PARAMETERS: x_Level IN NUMBER
190
191 DESIGN REFERENCES:
192
193 ALGORITHM:
194
195 NOTES:
196
197 OPEN ISSUES:
198
199 CLOSED ISSUES:
200
201 CHANGE HISTORY: Jon Haulund Created 7/25/97
202 ===========================================================================*/
203 FUNCTION level_defined (x_Level IN NUMBER) RETURN BOOLEAN;
204
205
206 /*===========================================================================
207 PROCEDURE NAME: start_time
208
209 DESCRIPTION: This procedure puts a time on the stack.
210
211 PARAMETERS: x_Level IN NUMBER
212 x_Marker IN VARCHAR2
213 x_Context IN VARCHAR2
214
215 DESIGN REFERENCES:
216
217 ALGORITHM:
218
219 NOTES:
220
221 OPEN ISSUES:
222
223 CLOSED ISSUES:
224
225 CHANGE HISTORY: Jon Haulund Created 7/25/97
226 ===========================================================================*/
227 PROCEDURE start_time (x_Level IN NUMBER, x_Marker IN VARCHAR2, x_Context IN VARCHAR2 := NULL);
228
229
230 /*===========================================================================
231 PROCEDURE NAME: start_time
232
233 DESCRIPTION: This procedure puts a time on the stack.
234
235 PARAMETERS: x_Marker IN VARCHAR2
236 x_Context IN VARCHAR2
237
238 DESIGN REFERENCES:
239
240 ALGORITHM:
241
242 NOTES:
243
244 OPEN ISSUES:
245
246 CLOSED ISSUES:
247
248 CHANGE HISTORY: Jon Haulund Created 7/25/97
249 ===========================================================================*/
250 PROCEDURE start_time (x_Marker IN VARCHAR2, x_Context IN VARCHAR2 := NULL);
251
252
253 /*===========================================================================
254 PROCEDURE NAME: stop_time
255
256 DESCRIPTION: This procedure shows time elapsed for the passed marker value
257
258 PARAMETERS: x_Level IN NUMBER
259 x_Marker IN NUMBER
260 x_Context IN VARCHAR2 := NULL
261
262 DESIGN REFERENCES:
263
264 ALGORITHM:
265
266 NOTES:
267
268 OPEN ISSUES:
269
270 CLOSED ISSUES:
271
272 CHANGE HISTORY: Jon Haulund Created 7/25/97
273 ===========================================================================*/
274 PROCEDURE stop_time (x_Level IN NUMBER, x_Marker IN VARCHAR2, x_Context IN VARCHAR2 := NULL);
275
276
277 /*===========================================================================
278 PROCEDURE NAME: stop_time
279
280 DESCRIPTION: This procedure shows time elapsed for the passed marker value
281
282 PARAMETERS: x_Marker IN NUMBER
283 x_Context IN VARCHAR2 := NULL
284
285 DESIGN REFERENCES:
286
287 ALGORITHM:
288
289 NOTES:
290
291 OPEN ISSUES:
292
293 CLOSED ISSUES:
294
295 CHANGE HISTORY: Jon Haulund Created 7/25/97
296 ===========================================================================*/
297 PROCEDURE stop_time (x_Marker IN VARCHAR2, x_Context IN VARCHAR2 := NULL);
298
299
300 /*===========================================================================
301 PROCEDURE NAME: tstart
302
303 DESCRIPTION: This procedure stores start time for a function
304
305 PARAMETERS: x_Marker IN VARCHAR2
306
307 DESIGN REFERENCES:
308
309 ALGORITHM:
310
311 NOTES:
312
313 OPEN ISSUES:
314
315 CLOSED ISSUES:
316
317 CHANGE HISTORY: Jon Haulund Created 2/11/99
318 ===========================================================================*/
319 PROCEDURE tstart(x_Marker IN VARCHAR2);
320
321
322 /*===========================================================================
323 PROCEDURE NAME: tstart
324
325 DESCRIPTION: This procedure stores start time for a function
326
327 PARAMETERS: x_Level IN NUMBER
328 x_Marker IN VARCHAR2
329
330 DESIGN REFERENCES:
331
332 ALGORITHM:
333
334 NOTES:
335
336 OPEN ISSUES:
337
338 CLOSED ISSUES:
339
340 CHANGE HISTORY: Jon Haulund Created 2/11/99
341 ===========================================================================*/
342 PROCEDURE tstart(x_Level IN NUMBER, x_Marker IN VARCHAR2);
343
344
345 /*===========================================================================
346 PROCEDURE NAME: tstop
347
348 DESCRIPTION: This procedure stores elapsed time for a function
349
350 PARAMETERS: x_Marker IN VARCHAR2
351
352 DESIGN REFERENCES:
353
354 ALGORITHM:
355
356 NOTES:
357
358 OPEN ISSUES:
359
360 CLOSED ISSUES:
361
362 CHANGE HISTORY: Jon Haulund Created 2/11/99
363 ===========================================================================*/
364 PROCEDURE tstop(x_Marker IN VARCHAR2);
365
366
367 /*===========================================================================
368 PROCEDURE NAME: tstop
369
370 DESCRIPTION: This procedure stores elapsed time for a function
371
372 PARAMETERS: x_Level IN NUMBER
373 x_Marker IN VARCHAR2
374
375 DESIGN REFERENCES:
376
377 ALGORITHM:
378
379 NOTES:
380
381 OPEN ISSUES:
382
383 CLOSED ISSUES:
384
385 CHANGE HISTORY: Jon Haulund Created 2/11/99
386 ===========================================================================*/
387 PROCEDURE tstop(x_Level IN NUMBER, x_Marker IN VARCHAR2);
388
389
390 /*===========================================================================
391 FUNCTION NAME: tprint
392
393 DESCRIPTION: This function prints elapsed time for a function
394
395 PARAMETERS: x_Marker IN VARCHAR2
396
397 DESIGN REFERENCES:
398
399 ALGORITHM:
400
401 NOTES:
402
403 OPEN ISSUES:
404
405 CLOSED ISSUES:
406
407 CHANGE HISTORY: Jon Haulund Created 2/11/99
408 ===========================================================================*/
409 FUNCTION tprint(x_Marker IN VARCHAR2) RETURN VARCHAR2;
410
411
412 /*===========================================================================
413 PROCEDURE NAME: tdump
414
415 DESCRIPTION: This procedure dumps stored times for all functions.
416
417 PARAMETERS: x_Marker IN VARCHAR2
418
419 DESIGN REFERENCES:
420
421 ALGORITHM:
422
423 NOTES:
424
425 OPEN ISSUES:
426
427 CLOSED ISSUES:
428
429 CHANGE HISTORY: Jon Haulund Created 2/11/99
430 ===========================================================================*/
431 PROCEDURE tdump(x_Context IN VARCHAR2);
432
433
434 /*===========================================================================
435 PROCEDURE NAME: tdump
436
437 DESCRIPTION: This procedure dumps stored times for all functions.
438
439 PARAMETERS: x_Level IN NUMBER
440 x_Context IN VARCHAR2
441
442 DESIGN REFERENCES:
443
444 ALGORITHM:
445
446 NOTES:
447
448 OPEN ISSUES:
449
450 CLOSED ISSUES:
451
452 CHANGE HISTORY: Jon Haulund Created 2/11/99
453 ===========================================================================*/
454 PROCEDURE tdump(x_Level IN NUMBER, x_Context IN VARCHAR2);
455
456
457 /*===========================================================================
458 PROCEDURE NAME: start_debug
459
460 DESCRIPTION: This procedure initializes the debug session.
461
462 PARAMETERS:
463
464 DESIGN REFERENCES:
465
466 ALGORITHM:
467
468 NOTES:
469
470 OPEN ISSUES:
471
472 CLOSED ISSUES:
473
474 CHANGE HISTORY: Jon Haulund Created 7/25/97
475 ===========================================================================*/
476 PROCEDURE start_debug(file_number VARCHAR2 DEFAULT null);
477
478
479 /*===========================================================================
480 PROCEDURE NAME: stop_debug
481
482 DESCRIPTION: This procedure closes the debug session.
483
484 PARAMETERS:
485
486 DESIGN REFERENCES:
487
488 ALGORITHM:
489
490 NOTES:
491
492 OPEN ISSUES:
493
494 CLOSED ISSUES:
495
496 CHANGE HISTORY: Jon Haulund Created 7/25/97
497 ===========================================================================*/
498 PROCEDURE stop_debug;
499
500 /*===========================================================================
501 PROCEDURE NAME: write_output
502
503 DESCRIPTION: This procedure writes output to the requested areas
504
505 PARAMETERS: x_Line IN VARCHAR2
509 ALGORITHM:
506
507 DESIGN REFERENCES:
508
510
511 NOTES:
512
513 OPEN ISSUES:
514
515 CLOSED ISSUES:
516
517 CHANGE HISTORY: Jon Haulund Created 7/25/97
518 ===========================================================================*/
519 PROCEDURE write_output(x_Line IN VARCHAR2);
520
521
522 /*===========================================================================
523 PROCEDURE NAME: dlog
524
525 DESCRIPTION: This procedure prints string followed by a string
526
527 PARAMETERS:
528
529 DESIGN REFERENCES:
530
531 ALGORITHM:
532
533 NOTES:
534
535 OPEN ISSUES:
536
537 CLOSED ISSUES:
538
539 CHANGE HISTORY: Jon Haulund Created 7/25/97
540 ===========================================================================*/
541 PROCEDURE dlog(x_Level IN NUMBER, x_Text IN VARCHAR2, x_Value IN VARCHAR2 := NULL);
542
543
544 /*===========================================================================
545 PROCEDURE NAME: dlog
546
547 DESCRIPTION: This procedure prints string followed by a number
548
549 PARAMETERS:
550
551 DESIGN REFERENCES:
552
553 ALGORITHM:
554
555 NOTES:
556
557 OPEN ISSUES:
558
559 CLOSED ISSUES:
560
561 CHANGE HISTORY: Jon Haulund Created 7/25/97
562 ===========================================================================*/
563 PROCEDURE dlog(x_Level IN NUMBER, x_Text IN VARCHAR2, x_Value IN NUMBER);
564
565
566 /*===========================================================================
567 PROCEDURE NAME: dlog
568
569 DESCRIPTION: This procedure prints string followed by a date
570
571 PARAMETERS:
572
573 DESIGN REFERENCES:
574
575 ALGORITHM:
576
577 NOTES:
578
579 OPEN ISSUES:
580
581 CLOSED ISSUES:
582
583 CHANGE HISTORY: Jon Haulund Created 7/25/97
584 ===========================================================================*/
585 PROCEDURE dlog(x_Level IN NUMBER, x_Text IN VARCHAR2, x_Value IN DATE,
586 x_Mask IN VARCHAR2 := 'DD-MON-YYYY HH:MI:SS PM');
587
588
589 /*===========================================================================
590 PROCEDURE NAME: dlog
591
592 DESCRIPTION: This procedure prints string followed by a boolean
593
594 PARAMETERS:
595
596 DESIGN REFERENCES:
597
598 ALGORITHM:
599
600 NOTES:
601
602 OPEN ISSUES:
603
604 CLOSED ISSUES:
605
606 CHANGE HISTORY: Jon Haulund Created 7/25/97
607 ===========================================================================*/
608 PROCEDURE dlog(x_Level IN NUMBER, x_Text IN VARCHAR2, x_Value IN boolean);
609
610
611 /*===========================================================================
612 PROCEDURE NAME: dlog
613
614 DESCRIPTION: This procedure prints string followed by a number.
615 Does not require level and always prints.
616
617 PARAMETERS:
618
619 DESIGN REFERENCES:
620
621 ALGORITHM:
622
623 NOTES:
624
625 OPEN ISSUES:
626
627 CLOSED ISSUES:
628
629 CHANGE HISTORY: Jon Haulund Created 7/25/97
630 ===========================================================================*/
631 PROCEDURE dlog(x_Text IN VARCHAR2, x_Value IN NUMBER);
632
633
634 /*===========================================================================
635 PROCEDURE NAME: dlog
636
637 DESCRIPTION: This procedure prints string followed by a string
638 Does not require level and always prints.
639
640 PARAMETERS:
641
642 DESIGN REFERENCES:
643
644 ALGORITHM:
645
646 NOTES:
647
648 OPEN ISSUES:
649
650 CLOSED ISSUES:
651
652 CHANGE HISTORY: Jon Haulund Created 7/25/97
653 ===========================================================================*/
654 PROCEDURE dlog(x_Text IN VARCHAR2, x_Value IN VARCHAR2 := NULL);
655
656
657 /*===========================================================================
658 PROCEDURE NAME: dlog
659
660 DESCRIPTION: This procedure prints string followed by a date
661 Does not require level and always prints.
662
663 PARAMETERS:
664
665 DESIGN REFERENCES:
666
667 ALGORITHM:
668
669 NOTES:
670
671 OPEN ISSUES:
672
673 CLOSED ISSUES:
674
675 CHANGE HISTORY: Jon Haulund Created 7/25/97
676 ===========================================================================*/
677 PROCEDURE dlog(x_Text IN VARCHAR2, x_Value IN DATE,
678 x_Mask IN VARCHAR2 := 'DD-MON-YYYY HH:MI:SS PM');
679
680
681 /*===========================================================================
682 PROCEDURE NAME: dlog
683
687 PARAMETERS:
684 DESCRIPTION: This procedure prints string followed by a boolean
685 Does not require level and always prints.
686
688
689 DESIGN REFERENCES:
690
691 ALGORITHM:
692
693 NOTES:
694
695 OPEN ISSUES:
696
697 CLOSED ISSUES:
698
699 CHANGE HISTORY: Jon Haulund Created 7/25/97
700 ===========================================================================*/
701 PROCEDURE dlog(x_Text IN VARCHAR2, x_Value IN boolean);
702
703
704 /*===========================================================================
705 PROCEDURE NAME: dlogd
706
707 DESCRIPTION: This procedure prints string followed by an index,
708 followed by a string, and a date value.
709
710 PARAMETERS:
711
712 DESIGN REFERENCES:
713
714 ALGORITHM:
715
716 NOTES:
717
718 OPEN ISSUES:
719
720 CLOSED ISSUES:
721
722 CHANGE HISTORY: Abhijit Mitra Created 7/17/98
723 ===========================================================================*/
724 PROCEDURE dlogd(x_Level IN NUMBER, x_Text1 IN VARCHAR2 := NULL, x_Index IN NUMBER := NULL, x_Text2
725 IN VARCHAR2 := NULL, x_Value IN DATE := NULL);
726
727 /*===========================================================================
728 PROCEDURE NAME: dlogn
729
730 DESCRIPTION: This procedure prints string followed by an index,
731 followed by a string, and a number value.
732
733 PARAMETERS:
734
735 DESIGN REFERENCES:
736
737 ALGORITHM:
738
739 NOTES:
740
741 OPEN ISSUES:
742
743 CLOSED ISSUES:
744
745 CHANGE HISTORY: Abhijit Mitra Created 7/17/98
746 ===========================================================================*/
747 PROCEDURE dlogn(x_Level IN NUMBER, x_Text1 IN VARCHAR2 := NULL, x_Index IN NUMBER := NULL, x_Text2
748 IN VARCHAR2 := NULL, x_Value IN NUMBER := NULL);
749
750 /*===========================================================================
751
752 PROCEDURE NAME: dpush
753
754 DESCRIPTION: This procedure pushes a call onto the call stack
755
756 PARAMETERS:
757
758 DESIGN REFERENCES:
759
760 ALGORITHM:
761
762 NOTES:
763
764 OPEN ISSUES:
765
766 CLOSED ISSUES:
767
768 CHANGE HISTORY: Jon Haulund Created 7/25/97
769 ===========================================================================*/
770 PROCEDURE dpush(x_Level IN NUMBER, x_Name IN VARCHAR2);
771
772
773 /*===========================================================================
774 PROCEDURE NAME: dpush
775
776 DESCRIPTION: This procedure pushes a call onto the call stack
777
778 PARAMETERS:
779
780 DESIGN REFERENCES:
781
782 ALGORITHM:
783
784 NOTES:
785
786 OPEN ISSUES:
787
788 CLOSED ISSUES:
789
790 CHANGE HISTORY: Jon Haulund Created 7/25/97
791 ===========================================================================*/
792 PROCEDURE dpush(x_Name IN VARCHAR2);
793
794
795 /*===========================================================================
796 PROCEDURE NAME: dpop
797
798 DESCRIPTION: This procedure pops a call off the call stack
799
800 PARAMETERS: x_Level IN NUMBER
801 x_Context IN VARCHAR2
802
803 DESIGN REFERENCES:
804
805 ALGORITHM:
806
807 NOTES:
808
809 OPEN ISSUES:
810
811 CLOSED ISSUES:
812
813 CHANGE HISTORY: Jon Haulund Created 7/25/97
814 ===========================================================================*/
815 PROCEDURE dpop(x_Level IN NUMBER, x_Context IN VARCHAR2 := NULL);
816
817
818 /*===========================================================================
819 PROCEDURE NAME: dpop
820
821 DESCRIPTION: This procedure pops a call off the call stack
822
823 PARAMETERS: x_Context IN VARCHAR2
824
825 DESIGN REFERENCES:
826
827 ALGORITHM:
828
829 NOTES:
830
831 OPEN ISSUES:
832
833 CLOSED ISSUES:
834
835 CHANGE HISTORY: Jon Haulund Created 7/25/97
836 ===========================================================================*/
837 PROCEDURE dpop(x_Context IN VARCHAR2 := NULL);
838
839
840 /*===========================================================================
841 FUNCTION NAME: make_space
842
843 DESCRIPTION: This function returns the indent space for output
844 depending on the level of the stack
845
846 PARAMETERS:
847
848 DESIGN REFERENCES:
849
850 ALGORITHM:
851
852 NOTES:
853
854 OPEN ISSUES:
855
856 CLOSED ISSUES:
857
858 CHANGE HISTORY: Jon Haulund Created 7/25/97
859 ===========================================================================*/
863 /*===========================================================================
860 FUNCTION make_space(x_Mode IN NUMBER := 0) RETURN VARCHAR2;
861
862
864 PROCEDURE NAME: print_debug_stuff
865
866 DESCRIPTION:
867
868 PARAMETERS:
869
870 DESIGN REFERENCES:
871
872 ALGORITHM:
873
874 NOTES:
875
876 OPEN ISSUES:
877
878 CLOSED ISSUES:
879
880 CHANGE HISTORY: Jon Haulund Created 7/25/97
881 ===========================================================================*/
882 PROCEDURE print_debug_stuff;
883
884
885 /*===========================================================================
886 PROCEDURE NAME: debug
887
888 DESCRIPTION: This procedure prints out a debug message
889 that has been passed to it if debug has
890 been enabled.
891
892 PARAMETERS: x_message IN VARCHAR2
893
894 DESIGN REFERENCES:
895
896 ALGORITHM:
897
898 NOTES:
899
900 OPEN ISSUES:
901
902 CLOSED ISSUES:
903
904 CHANGE HISTORY: Ramana Mulpury Created 10/26/96
905 ===========================================================================*/
906
907 PROCEDURE debug (x_message IN VARCHAR2);
908
909 /*===========================================================================
910 PROCEDURE NAME: enable_debug
911
912 DESCRIPTION: This procedure enables debug output.
913
914 PARAMETERS
915
916 DESIGN REFERENCES:
917
918 ALGORITHM:
919
920 NOTES:
921
922 OPEN ISSUES:
923
924 CLOSED ISSUES:
925
926 CHANGE HISTORY: Ramana Mulpury Created 10/26/96
927 ===========================================================================*/
928
929 PROCEDURE enable_debug;
930
931
932 /*===========================================================================
933 PROCEDURE NAME: disable_debug
934
935 DESCRIPTION: This procedure disables debug output.
936
937 PARAMETERS
938
939 DESIGN REFERENCES:
940
941 ALGORITHM:
942
943 NOTES:
944
945 OPEN ISSUES:
946
947 CLOSED ISSUES:
948
949 CHANGE HISTORY: Ramana Mulpury Created 10/26/96
950 ===========================================================================*/
951
952 PROCEDURE disable_debug;
953
954
955 /*===========================================================================
956 FUNCTION NAME: debug_enabled
957
958 DESCRIPTION: This function returns TRUE if debug is
959 enabled.
960
961 PARAMETERS
962
963 DESIGN REFERENCES:
964
965 ALGORITHM:
966
967 NOTES:
968
969 OPEN ISSUES:
970
971 CLOSED ISSUES:
972
973 CHANGE HISTORY: Ramana Mulpury Created 10/26/96
974 ===========================================================================*/
975
976 FUNCTION debug_enabled RETURN BOOLEAN;
977
978
979 /*===========================================================================
980 FUNCTION NAME: get_no_key
981
982 DESCRIPTION This is function returns k_no_key value.
983
984 PARAMETERS
985
986 DESIGN REFERENCES: rlmdpdtu.rtf
987
988 ALGORITHM:
989
990 NOTES:
991
992 OPEN ISSUES:
993
994 CLOSED ISSUES:
995
996 CHANGE HISTORY: rjupudy 10/28/98 created
997 ============================================================================*/
998 FUNCTION get_no_key
999 RETURN VARCHAR2;
1000
1001 /*===========================================================================
1002 FUNCTION NAME: get_default_key
1003
1004 DESCRIPTION This function returns k_default_match_key.
1005
1006 PARAMETERS
1007
1008 DESIGN REFERENCES: rlmdpdtu.rtf
1009
1010 ALGORITHM:
1011
1012 NOTES:
1013
1014 OPEN ISSUES:
1015
1016 CLOSED ISSUES:
1017
1018 CHANGE HISTORY: rjupudy 10/28/98 created
1019 ============================================================================*/
1020 FUNCTION get_default_key
1021 RETURN VARCHAR2;
1022
1023
1024 /*=========================================================================
1025
1026 FUNCTION NAME: get_lookup_meaning
1027
1028 DESCRIPTION This function will return the meaning based on
1029 lookup type and lookup code meaning based on
1030 This is used for error tokens
1031 ===========================================================================*/
1032
1033 FUNCTION get_lookup_meaning (x_lookup_type IN VARCHAR2,
1034 x_lookup_code IN VARCHAR2)
1035 RETURN VARCHAR2;
1036 /*===========================================================================
1037
1038 PROCEDURE NAME: populate_match_keys
1039
1040 DESCRIPTION: This procedure will populate the matching key values
1044 x_ScheduleType IN VARCHAR2
1041 in the match_key record in the group_rec
1042
1043 PARAMETERS: x_Group_rec IN t_Group_rec
1045
1046
1047 DESIGN REFERENCES: RLADPHLD.rtf
1048 RLADPRDD.rtf
1049
1050 ALGORITHM:
1051
1052 NOTES:
1053
1054 OPEN ISSUES:
1055
1056 CLOSED ISSUES:
1057
1058 CHANGE HISTORY: created mnandell 03/05/99
1059 ===========================================================================*/
1060 PROCEDURE populate_match_keys(x_match_rec IN OUT NOCOPY t_match_rec,
1061 x_match_key IN VARCHAR2);
1062
1063 /*===========================================================================
1064
1065 PROCEDURE NAME: SetSchedulePSError
1066
1067 DESCRIPTION: This procedure sets the process status to Error
1068 for both lines and header and called when 'WHEN OTHERS'
1069 exception is raised.
1070
1071 PARAMETERS: x_header_id IN NUMBER
1072
1073
1074 DESIGN REFERENCES: RLADPHLD.rtf
1075
1076 ALGORITHM:
1077
1078 NOTES:
1079
1080 OPEN ISSUES:
1081
1082 CLOSED ISSUES:
1083
1084 CHANGE HISTORY: created mnandell 03/05/99
1085 ===========================================================================*/
1086 PROCEDURE SetSchedulePSError(x_header_id IN NUMBER,
1087 x_sch_header_id IN NUMBER DEFAULT NULL);
1088
1089 /*=========================================================================
1090
1091 FUNCTION NAME: get_customer_name
1092
1093 DESCRIPTION This function will return the customer name based on
1094 customer_id This is used for error tokens
1095 ===========================================================================*/
1096 FUNCTION get_customer_name (x_customer_id IN NUMBER)
1097 RETURN VARCHAR2;
1098
1099 /*=========================================================================
1100
1101 FUNCTION NAME: get_item_number
1102
1103 DESCRIPTION This function will return the item_number based on
1104 customer_item_id This is used for error tokens
1105 ===========================================================================*/
1106 FUNCTION get_item_number (x_item_id IN NUMBER)
1107 RETURN VARCHAR2;
1108
1109 /*=========================================================================
1110
1111 FUNCTION NAME: get_ship_from
1112
1113 DESCRIPTION This function will return the ship_from org code based on
1114 ship_from_org_id This is used for error tokens
1115 ===========================================================================*/
1116 FUNCTION get_ship_from (x_ship_from_id IN NUMBER)
1117 RETURN VARCHAR2;
1118
1119 /*=========================================================================
1120
1121 FUNCTION NAME: get_ship_to
1122
1123 DESCRIPTION This function will return the ship to location code based on
1124 ship_to_id This is used for error tokens
1125 ===========================================================================*/
1126 FUNCTION get_ship_to (x_ship_to_id IN NUMBER)
1127 RETURN VARCHAR2;
1128
1129
1130 /*=========================================================================
1131
1132 FUNCTION NAME: get_schedule_reference_num
1133
1134 DESCRIPTION This function will return the schedule_reference_num based on
1135 header_id This is used for error tokens
1136 ===========================================================================*/
1137 FUNCTION get_schedule_reference_num (x_header_id IN NUMBER)
1138 RETURN VARCHAR2;
1139
1140 /*=========================================================================
1141
1142 FUNCTION NAME: OpenDynamicCursor
1143
1144 DESCRIPTION This function opens a dynamic sql cursor with a USING clause
1145 ===========================================================================*/
1146
1147 PROCEDURE OpenDynamicCursor(p_cursor IN OUT NOCOPY t_Cursor_ref,
1148 p_statement IN VARCHAR2,
1149 p_dynamic_tab IN t_dynamic_tab);
1150
1151
1152
1153 /*=======================================================================
1154
1155 FUNCTION NAME : GetDefaultOU
1156
1157 DESCRIPTION : This function is used in DSP, Purge Concurrent programs to
1158 specify a default value for the Operating Unit parameter
1159
1160 HISTORY: rlanka Created 03/15/2005 for R12 MOAC project
1161 =========================================================================*/
1162 FUNCTION GetDefaultOU RETURN VARCHAR2;
1163
1164
1165
1166 /*=======================================================================
1167
1168 FUNCTION NAME : GetDefaultOUId
1169
1170 DESCRIPTION : This function is used in reports conc. programs and XML
1171 inbound processing to specify a default value for
1172 the Operating Unit parameter. This function is similar
1173 to the one defined above, except that this one returns
1174 the Operating Unit ID to the caller.
1175
1176 HISTORY: rlanka Created 03/15/2005 for R12 MOAC project
1177 =========================================================================*/
1178 FUNCTION GetDefaultOUId RETURN NUMBER;
1179
1180 /*=========================================================================
1181
1182 FUNCTION NAME: get_schedule_line_number
1183
1184 DESCRIPTION This function will return the schedule line number based on
1185 line_id. This is used for error tokens. (Bug 4297984)
1186 ===========================================================================*/
1187 FUNCTION get_schedule_line_number(x_line_id IN NUMBER)
1188 RETURN NUMBER;
1189
1190 /*=========================================================================
1191
1192 FUNCTION NAME: get_order_line_number
1193
1194 DESCRIPTION This function will return the order line number based on
1195 line_id. This is used for error tokens. (Bug 4297984)
1196 ===========================================================================*/
1197 FUNCTION get_order_line_number(x_line_id IN NUMBER)
1198 RETURN VARCHAR2;
1199
1200 /*=========================================================================
1201
1202 FUNCTION NAME: get_order_number
1203
1204 DESCRIPTION This function will return the order number based on
1205 header_id. This is used for error tokens. (Bug 4297984)
1206 ===========================================================================*/
1207 FUNCTION get_order_number(x_header_id IN NUMBER)
1208 RETURN NUMBER;
1209
1210 /*=========================================================================
1211
1212 FUNCTION NAME: get_proc_status_meaning
1213
1214 DESCRIPTION : This function will return the Process Status Meaning
1215 (Bug 4670512)
1216 ===========================================================================*/
1217 FUNCTION get_proc_status_meaning (x_status IN NUMBER)
1218 RETURN VARCHAR2;
1219
1220 END RLM_CORE_SV;