Hi all,
I have an issue with below script for inserting LPO lines. It runs fast without error but its not inserting the data in table POP10110. I have a similar script for header and its inserting the header details. I am running them separately and thereafter I will sandwich lines cursor inside the header one.
Use PRM
Declare
@PONUMBER [char](17),
@POTYPE [smallint],
@ITEMNMBR [char](31),
@ITEMDESC [char](101),
@VENDORID [char](15),
@VNDITNUM [char](31),
@VNDITDSC [char](101),
--@NONINVEN [smallint],
@LOCNCODE [char](11),
@UOFM [char](9),
--@UMQTYINB [numeric](19, 5),
@QTYORDER [numeric](19, 5),
--@QTYCANCE [numeric](19, 5),
--@QTYCMTBASE [numeric](19, 5),
--@QTYUNCMTBASE [numeric](19, 5),
@UNITCOST [numeric](19, 5),
@EXTDCOST [numeric](19, 5)
Declare @Ecode int set @Ecode = 0
Declare @oEString varchar(255)
Set @oEString=''
Declare POPLine cursor for
SELECT [PONUMBER],[POTYPE],[ITEMNMBR],[ITEMDESC],[VENDORID],[VNDITNUM],[VNDITDSC],[LOCNCODE],[UOFM],[QTYORDER],[UNITCOST],[EXTDCOST]
FROM TWO..[POP10110]
Open POPLine
FETCH next from POPLine
into @PONUMBER,@POTYPE,@ITEMNMBR,@ITEMDESC,@VENDORID,@VNDITNUM,@VNDITDSC,@LOCNCODE,@UOFM,@QTYORDER,@UNITCOST,@EXTDCOST
WHILE (@@FETCH_STATUS = 0)
BEGIN
--Select @PONUMBER,@POTYPE,@ITEMNMBR,@ITEMDESC,@VENDORID,@VNDITNUM,@VNDITDSC,@LOCNCODE,@UOFM,@QTYORDER,@UNITCOST,@EXTDCOST
--print @PONUMBER
Exec taPoLine
@I_vPOTYPE = default,
@I_vPONUMBER = @PONUMBER,
@I_vDOCDATE = default,
@I_vVENDORID='Test',
@I_vLOCNCODE=default,
@I_vVNDITNUM=@ITEMNMBR,
@I_vITEMNMBR=@ITEMNMBR,
@I_vQUANTITY=@QTYORDER,
@I_vQTYCANCE=default,
@I_vFREEONBOARD=default,
@I_vREQSTDBY=default,
@I_vCOMMNTID=default,
@I_vCOMMENT_1=default,
@I_vCOMMENT_2=default,
@I_vCOMMENT_3=default,
@I_vCOMMENT_4=default,
@I_vREQDATE=default,
@I_vRELEASEBYDATE=default,
@I_vPRMDATE=default,
@I_vPRMSHPDTE=default,
@I_vNONINVEN=default,
@I_vIVIVINDX=default,
@I_vInventoryAccount=default,
@I_vITEMDESC=default,
@I_vUNITCOST=@UNITCOST,
@I_vVNDITDSC=default,
@I_vUOFM=default,
@I_vPurchase_IV_Item_Taxable=default,
@I_vPurchase_Item_Tax_Schedu=default,
@I_vPurchase_Site_Tax_Schedu=default,
@I_vBSIVCTTL=default,
@I_vTAXAMNT=default,
@I_vBCKTXAMT=default,
@I_vLanded_Cost_Group_ID=default,
@I_vPLNNDSPPLID=default,
@I_vSHIPMTHD=default,
@I_vBackoutTradeDiscTax=default,
@I_vPOLNESTA=default,
@I_vCMMTTEXT=default,
@I_vORD=default,
@I_vCUSTNMBR=default,
@I_vADRSCODE=default,
@I_vCMPNYNAM=default,
@I_vCONTACT=default,
@I_vADDRESS1=default,
@I_vADDRESS2=default,
@I_vADDRESS3=default,
@I_vCITY=default,
@I_vSTATE=default,
@I_vZIPCODE=default,
@I_vCCode=default,
@I_vCOUNTRY=default,
@I_vPHONE1=default,
@I_vPHONE2=default,
@I_vPHONE3=default,
@I_vFAX=default,
@I_vPrint_Phone_NumberGB=default,
@I_vCURNCYID=default,
@I_vProjNum=default,
@I_vCostCatID=default,
@I_vLineNumber=default,
@I_vUpdateIfExists=default,
@I_vNOTETEXT=default,
@I_vRequesterTrx=default,
@I_vUSRDEFND1=default,
@I_vUSRDEFND2=default,
@I_vUSRDEFND3=default,
@I_vUSRDEFND4=default,
@I_vUSRDEFND5=default,
@O_iErrorState=@Ecode,
@oErrString=@oEString
--GET THE NEXT RECORD
FETCH next from POPLine
into @PONUMBER,@POTYPE,@ITEMNMBR,@ITEMDESC,@VENDORID,@VNDITNUM,@VNDITDSC,@LOCNCODE,@UOFM,@QTYORDER,@UNITCOST,@EXTDCOST
END
--CLOSE AND DEALLOCATE THE CURSOR
CLOSE POPLine
DEALLOCATE POPLine
Kindly help.
RomRyan
