SE REQUIERE DE INGRESAR CAMPOS DE CANTIDAD INCIAL, CODENSAYO, ORDEN EN LA PANTALLA PARA SABER EN DONDE SE INGRESO LOS INSUMOS.
LA PANTTALLA TRATADA ES IPMONTRAZABILIDADALL.PAN
EN SCRIP ANTERIOR QUE SE ESTABA CONSULTADO, ES:
SELECT CM.FECFINMOV,CM.HORAFINMOV,CM.CODCONCE CONCEPTO,CM.CODMOV,
LM.CODART ARTICULO,ART.DESART,(SELECT CL.DESCLASE FROM IPCLASES CL, IPCLASEARTIC CLA WHERE CLA.CODART=ART.CODART AND CLA.CODCLASE=CL.CODCLASE AND CLA.CODCLASIF='TIPO') TIPO,CODLOT, CANTIP62HOST(LM.CANTIDAD,ART.UNIDADES,ART.UNIDADESHOST) * DECODE(CPT.TIPOCONCE,'S',-1,1) CANTIDADTOTAL ,ART.UNIDADESHOST, LM.BLOQUEOS ,
CM.CODOPEMODIF USUARIO
FROM IPCABMV CM, IPLINMV LM,IPARTIC ART, IPCONCEPTO CPT
WHERE LM.CODART=ART.CODART AND CM.CODCONCE = CPT.CODCONCE
AND CM.CODMOV = LM.CODMOV
AND (:CODART IS NULL OR ART.CODART||'' LIKE NVL(:CODART,'')||'%' )
AND CM.FECFINMOV BETWEEN :FECDESDE AND :FECHASTA
AND ART.CODDIV LIKE NVL(:CODDIV,'')||'%' AND CODLOT LIKE NVL(:CODLOTE,'')||'%';
=====================================
SE REALIZO AJUSTES SOBRE ESTA PANTALLA, AÑADIENDO CAMPOS DE ORDEN, ENSAYO Y CANTIDAD INICIAL, LOS CUALES ESTA ASOCIADOS, AL RECURSO
SELECT CM.FECFINMOV,CM.HORAFINMOV,CM.CODCONCE CONCEPTO,CM.CODMOV,
LM.CODART ARTICULO,ART.DESART,(CASE WHEN (SELECT CL.DESCLASE FROM IPCLASEARTIC CLA, IPCLASES CL WHERE CLA.CODCLASE=CL.CODCLASE AND CLA.CODCLASIF='TIPO' AND CLA.CODART=ART.CODART) IS NULL THEN
(SELECT CL.DESCLASE FROM IPCLASEARTIC CLA, IPCLASES CL WHERE CLA.CODCLASE=CL.CODCLASE AND CLA.CODCLASIF='RECURSO' AND CLA.CODART=ART.CODART AND ROWNUM=1)END) TIPO,LM.CODLOT, (SELECT CANTIDADHOST FROM IPFUENTESTOCK WHERE CODART=:CODART AND CODLOT=LM.CODLOT AND BULTO=LM.BULTO AND ROWNUM=1)CANTINI , CANTIP62HOST(LM.CANTIDAD,ART.UNIDADES,ART.UNIDADESHOST) * DECODE(CPT.TIPOCONCE,'S',-1,1) CANTIDADTOTAL ,ART.UNIDADESHOST, LM.BLOQUEOS ,
ENS.DESCENSAYO CODENSAYO, ENS.DESENSESP ENSAYO,ORD.CODPETICION ORDEN, CM.CODOPEMODIF USUARIO
FROM IPCABMV CM, IPLINMV LM,IPARTIC ART, IPCONCEPTO CPT,IPLPETMUERECURSOTAEA ORD, IPLENSAYO ENS
WHERE LM.CODART=ART.CODART AND CM.CODCONCE = CPT.CODCONCE
AND CM.CODMOV = LM.CODMOV AND LM.CODART=ORD.CODART AND LM.CODLOT=ORD.CODLOT AND ORD.CODENSAYO=ENS.CODENSAYO
AND (:CODART IS NULL OR ART.CODART||'' LIKE NVL(:CODART,'')||'%' )
AND CM.FECFINMOV BETWEEN :FECDESDE AND :FECHASTA
AND ART.CODDIV LIKE NVL(:CODDIV,'')||'%' AND LM.CODLOT LIKE NVL(:CODLOTE,'')||'%';