DBA Data[Home] [Help]

APPS.WSH_INV_INTEGRATION_GRP dependencies on WSH_INV_INTEGRATION_GRP

Line 1: PACKAGE BODY WSH_INV_INTEGRATION_GRP AS

1: PACKAGE BODY WSH_INV_INTEGRATION_GRP AS
2: /* $Header: WSHINVIB.pls 120.1 2012/01/05 16:39:40 brana ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_INV_INTEGRATION_GRP ';
5: --

Line 4: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_INV_INTEGRATION_GRP ';

1: PACKAGE BODY WSH_INV_INTEGRATION_GRP AS
2: /* $Header: WSHINVIB.pls 120.1 2012/01/05 16:39:40 brana ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(50) := 'WSH_INV_INTEGRATION_GRP ';
5: --
6:
7: PROCEDURE Find_Printer (
8: p_subinventory IN VARCHAR2 ,

Line 92: for i in 1..WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB.count loop

88: END IF ;
89:
90: l_exists_org_sub :='N' ;
91:
92: for i in 1..WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB.count loop
93: if WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB(i) = p_organization_id || '~' || p_subinventory || '~' ||v_concurrent_program_name THEN
94: --
95: l_exists_org_sub := 'Y' ;
96: exit ;

Line 93: if WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB(i) = p_organization_id || '~' || p_subinventory || '~' ||v_concurrent_program_name THEN

89:
90: l_exists_org_sub :='N' ;
91:
92: for i in 1..WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB.count loop
93: if WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB(i) = p_organization_id || '~' || p_subinventory || '~' ||v_concurrent_program_name THEN
94: --
95: l_exists_org_sub := 'Y' ;
96: exit ;
97: end if ;

Line 106: WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB(WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB.count + 1 ):= p_organization_id || '~' || p_subinventory||'~' ||v_concurrent_program_name ;

102: -- Insert the orgsub combination in the global table:
103:
104: IF l_exists_org_sub = 'N' THEN
105:
106: WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB(WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB.count + 1 ):= p_organization_id || '~' || p_subinventory||'~' ||v_concurrent_program_name ;
107:
108: l_org_found := 0 ;
109:
110: for i in 1..WSH_INV_INTEGRATION_GRP.G_ORGTAB.count loop

Line 110: for i in 1..WSH_INV_INTEGRATION_GRP.G_ORGTAB.count loop

106: WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB(WSH_INV_INTEGRATION_GRP.G_ORGSUBTAB.count + 1 ):= p_organization_id || '~' || p_subinventory||'~' ||v_concurrent_program_name ;
107:
108: l_org_found := 0 ;
109:
110: for i in 1..WSH_INV_INTEGRATION_GRP.G_ORGTAB.count loop
111:
112: if WSH_INV_INTEGRATION_GRP.G_ORGTAB(i) = p_organization_id|| '~' ||v_concurrent_program_name THEN
113: --
114: l_org_found := 1 ;

Line 112: if WSH_INV_INTEGRATION_GRP.G_ORGTAB(i) = p_organization_id|| '~' ||v_concurrent_program_name THEN

108: l_org_found := 0 ;
109:
110: for i in 1..WSH_INV_INTEGRATION_GRP.G_ORGTAB.count loop
111:
112: if WSH_INV_INTEGRATION_GRP.G_ORGTAB(i) = p_organization_id|| '~' ||v_concurrent_program_name THEN
113: --
114: l_org_found := 1 ;
115: exit ; -- we don't return here , because we although this org has been encountered before
116: -- we want to know if a printer has been setup for this OrgSub combo.

Line 138: WSH_INV_INTEGRATION_GRP.G_ORGTAB(WSH_INV_INTEGRATION_GRP.G_ORGTAB.count + 1 ):= p_organization_id|| '~' ||v_concurrent_program_name;

134:
135: -- printer not set for the ( sub , org ) combination ,there search for just the org
136: -- First insert the org in the global table
137:
138: WSH_INV_INTEGRATION_GRP.G_ORGTAB(WSH_INV_INTEGRATION_GRP.G_ORGTAB.count + 1 ):= p_organization_id|| '~' ||v_concurrent_program_name;
139:
140: -- Next , see if printer setup has been done for this org
141:
142: OPEN c_org_printer ( p_organization_id ,v_concurrent_program_name) ;

Line 154: for i in 1..WSH_INV_INTEGRATION_GRP.G_PRINTERTAB.count loop

150: end if ;
151:
152: l_exists_printer :='N' ;
153:
154: for i in 1..WSH_INV_INTEGRATION_GRP.G_PRINTERTAB.count loop
155:
156: if WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(i).printer_name = l_printer_name
157: and WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(i).conc_program_name = v_concurrent_program_name THEN
158: --

Line 156: if WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(i).printer_name = l_printer_name

152: l_exists_printer :='N' ;
153:
154: for i in 1..WSH_INV_INTEGRATION_GRP.G_PRINTERTAB.count loop
155:
156: if WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(i).printer_name = l_printer_name
157: and WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(i).conc_program_name = v_concurrent_program_name THEN
158: --
159: l_exists_printer := 'Y';
160: exit;

Line 157: and WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(i).conc_program_name = v_concurrent_program_name THEN

153:
154: for i in 1..WSH_INV_INTEGRATION_GRP.G_PRINTERTAB.count loop
155:
156: if WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(i).printer_name = l_printer_name
157: and WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(i).conc_program_name = v_concurrent_program_name THEN
158: --
159: l_exists_printer := 'Y';
160: exit;
161: end if ;

Line 168: WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(WSH_INV_INTEGRATION_GRP.G_PRINTERTAB.count + 1 ).printer_name := l_printer_name ;

164: --
165: -- bug 3980388 - Not to add printer '-1' to the table because Find_Printer return '-1' printer when
166: -- printing report by user level.
167: IF l_printer_name <> '-1' and l_exists_printer ='N' THEN
168: WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(WSH_INV_INTEGRATION_GRP.G_PRINTERTAB.count + 1 ).printer_name := l_printer_name ;
169: WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(WSH_INV_INTEGRATION_GRP.G_PRINTERTAB.count).conc_program_name := v_concurrent_program_name;
170: END IF;
171:
172: END IF;

Line 169: WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(WSH_INV_INTEGRATION_GRP.G_PRINTERTAB.count).conc_program_name := v_concurrent_program_name;

165: -- bug 3980388 - Not to add printer '-1' to the table because Find_Printer return '-1' printer when
166: -- printing report by user level.
167: IF l_printer_name <> '-1' and l_exists_printer ='N' THEN
168: WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(WSH_INV_INTEGRATION_GRP.G_PRINTERTAB.count + 1 ).printer_name := l_printer_name ;
169: WSH_INV_INTEGRATION_GRP.G_PRINTERTAB(WSH_INV_INTEGRATION_GRP.G_PRINTERTAB.count).conc_program_name := v_concurrent_program_name;
170: END IF;
171:
172: END IF;
173: -- end bug 3980388

Line 183: x_error_message := 'Exception occurred in WSH_INV_INTEGRATION_GRP.Find_Printer';

179: END IF;
180: --
181: exception
182: when others then
183: x_error_message := 'Exception occurred in WSH_INV_INTEGRATION_GRP.Find_Printer';
184: x_api_status := FND_API.G_RET_STS_UNEXP_ERROR;
185: --
186: IF l_debug_on THEN
187: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');

Line 489: END WSH_INV_INTEGRATION_GRP ;

485: END Complete_Inv_Interface;
486:
487:
488:
489: END WSH_INV_INTEGRATION_GRP ;