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

method BSafStructure.ValidateComponent

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.