Skip to Main Content

E-Business Suite

Announcement

Testing banner

GVMs

GnimmoJan 11 2023

I am using a global variable to save some values(ids) from the xml as sections are triggered so i can use those values later on to determine if a section in the end should be triggered. I am setting SetGVM to "empty" with a section trigger in the beginning of the form. after some processing i am saving ids depending on which sections are triggered. and at the end of the form i am reading the gvms saved values and in the end of the form i am calling a section to SetGVM to empty again. In a local environment this works as intended but in a sever environment (Pre-Prod) the functionality is not working. how can we determine the reason why?

#p = COUNTREC("!/Transaction/Borrower/Product/")+1

#cout = 1
$GSS=1
#ROUNDIT=1
GS=""
SCS=""
PR=""
BOOL=""
ALLBOOL=""
#COP=1
#TIMES=1
#HOWMANY=1

#gsp = 1
IF HAVEGVM("PRODIDS")
LIDS = GVM("PRODIDS")
ELSE
LIDS="EMPTY"
END
IF HAVEGVM("COLLAIDS")
COLLIS = GVM("COLLAIDS")
ELSE
COLLIS = "EMPTY"
END
print_it("RULE 322 ***********************: ")
print_it("Products found: "&LIDS)
print_it("Collaterals found: "&COLLIS)
* RETURN("Products"&LIDS&COLLIS)
#CTR=1
WHILE #CTR<#P
LOPIDPATH= "!/Transaction/Borrower/Product[" & #ctr & "]/LOPProductID 1,9"
LOPID = GETDATA(LOPIDPATH)
TORET = "0"
#lenght = CODEINLIST(LOPID,LIDS)
TORET = #lenght
print_it("PRODUCT ID FOUND: "&TORET)
IF #lenght > 0
#c = COUNTREC("!/Transaction/Borrower/Product[" & #ctr & "]/Collateral/")+1
#CTR2=1
WHILE #CTR2<#C
GETPATCOL = "!/Transaction/Borrower/Product[" & #ctr & "]/Collateral[" & #ctr2 &"]/CollateralID 1,9"
COLLATERALID = GETDATA(GETPATCOL)
TORET = "0"
#lenght = CODEINLIST(COLLATERALID,COLLIS)
TORET = #lenght
print_it("CollateralID FOUNT : "&TORET)
IF #lenght > 0
PATH = "!/Transaction/Borrower/Product[" & #ctr & "]/Collateral[" & #ctr2 & "]/CollateralType 1,100"
CT = GETDATA(PATH)
IF CT= "PLBI" OR CT= "CGUA"
TORET = TORET
ELSE
#g = COUNTREC("!/Transaction/Borrower/Product[" & #ctr & "]/Collateral[" & #ctr2 & "]/Guarantor/")
#sp = COUNTREC("!/Transaction/Borrower/Product[" & #ctr & "]/Collateral[" & #ctr2 & "]/SecurityProvider/")
#gsp = #gsp + #g + #sp
#ctr3 =1
#ctr4 = 1
* GETPATHACT = "!/Transaction/Borrower/Product[" & #ctr & "]/Action 1,7"
PATH = "!/Transaction/Borrower/Product[" & #ctr & "]/Collateral[" & #ctr2 & "]/ActionOnCollateral 1,100"
AOC = GETDATA(PATH)
IF AOC != "C"
WHILE #ctr3 <=#G
PATH = "!/Transaction/Borrower/Product[" & #ctr & "]/Collateral[" & #ctr2 & "]/Guarantor[" & #ctr3 & "]/UniqueApplicantsFlag 1,100"
DAG = GETDATA(PATH)
IF DAG = "Y"
print_it("DAG: "&DAG)
RETURN(1)
END
#CTR3=#CTR3+1
WEND
WHILE #ctr4 <=#SP
PATH = "!/Transaction/Borrower/Product[" & #ctr & "]/Collateral[" & #ctr2 & "]/SecurityProvider[" & #ctr4 & "]/UniqueApplicantsFlag 1,100"
DAG = GETDATA(PATH)
IF DAG = "Y"
print_it("DAG: "&DAG)
RETURN(1)
END
#CTR4=#CTR4+1
WEND
END
END
END
#CTR2=#CTR2+1
WEND
END
#CTR=#CTR+1
WEND
RETURN(0)

Comments
Post Details
Added on Jan 11 2023
1 comment
32 views