project QadFinancials > class BSafStructure > method GetSafStructureIsReferenced
function returns logical
Description
Returns true if SafStructure is already used somewhere, otherwise false
Parameters
iiSafStructureId | input | integer | |
oiReturnStatus | output | integer | |
Internal usage
QadFinancials
program code (program1/bsafstructure.p)
if iiSafStructureId = ? or
iiSafStructureId = 0
then return false.
/*BudgetWBS*/
<Q-1 assign vlFcQueryRecordsAvailable = BudgetWBSByAll (NoCache)
(input ?, (BudgetID)
input ?, (BudgetWBSID)
input ?, (BudgetWBSCode)
input ?, (ParentBudgetWBSID)
input ?, (BudgetFDSType)
input iiSafStructureId, (SafStructureID)
input ?, (SafConceptID)
input ?, (BudgetFDSID)) in BBudget >
if vlFcQueryRecordsAvailable <> false
then return true.
/*PostingSaf*/
<Q-2 assign vlFcQueryRecordsAvailable = PostingSafByIDs (NoCache)
(input ?, (PostingSafId)
input ?, (PostingLineId)
input ?, (SafId)
input iiSafStructureId, (SafStructureId)) in BPosting >
if vlFcQueryRecordsAvailable <> false
then return true.
/*SafStructureLink*/
<Q-3 assign vlFcQueryRecordsAvailable = GetLinkForSafStucture (NoCache) (input iiSafStructureId, (SafStructureId)) in BSafStructureLink >
if vlFcQueryRecordsAvailable <> false
then return true.
/*in all other cases return false*/
return false.