project QadFinancials > class Database Component > method ValIntNotNULL

validation procedure

Description

ValIntNotNULL: Validation-method that raises an error in case the integer-field has the NULL value


Parameters


iiTargetFieldinputintegerValue of the business field to validate.
icTargetFieldNameinputcharacterName of the business field to validate.
icRowidinputcharacterContents of field tc_Rowid, if the target field is a field of a component temp-table.
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


QadFinancials
validation on tAcctIFFilter.AcctIFFilterBudgetLevel
validation on tAllocationProportional.CostCentre_ID
validation on tAllocationProportional.Division_ID
validation on tAllocationProportional.Project_ID
validation on tAllocationProportional.Saf_ID
validation on tAutoNumber.Domain_ID
validation on tAutoNumber.SharedSet_ID
validation on tBankStateStageAlloc.BankStateAlloc_ID
validation on tBankStateStageAlloc.CInvoiceStage_ID
validation on tBankStateStageAlloc.DInvoiceStage_ID
validation on tBankNumber.BankPayFormat_ID
validation on tBankNumber.CompanySharedSet_ID
validation on tBankNumber.ParentObject_ID
validation on tBankNumberPayCode.PayFormatGroup_ID
validation on tBudgetPeriod.BudgetPeriodSeq
validation on tBudgetWBS.BudgetFDS_ID
validation on tBudgetLinkAccDet.CostCentre_ID
validation on tBudgetLinkAccDet.Division_ID
validation on tBudgetLinkAccDet.Project_ID
validation on tBudgetLinkAccDet.Saf_ID
validation on tCDocInvoiceXrefStage.CInvoiceStage_ID
validation on tCInvoiceVat.Vat_ID
validation on tCInvoiceWHT.CInvoiceVat_ID
validation on tCInvoiceWHT.Vat_ID
validation on tCOAMaskCC.SharedSet_ID
validation on tCHist.CostCentre_ID
validation on tCHist.Division_ID
validation on tCHist.Project_ID
validation on tFRWCubeHistLink.FRWCubeMeas_ID
validation on tFRWCubeHistLink.PostingHist_ID
validation on tDDocInvoiceXrefStage.DInvoiceStage_ID
validation on tDHist.CostCentre_ID
validation on tDHist.Division_ID
validation on tDHist.Project_ID
validation on tDInvoiceDeduction.DInvoiceDeductionSequence
validation on tDInvoiceDeduction.PaidDInvoice_ID
validation on tDInvoiceVat.Vat_ID
validation on tDPaySelLine.DPaySelLineParentObject_ID
validation on tDPaySelLineStg.CInvoiceStage_ID
validation on tDPaySelLineStg.DInvoiceStage_ID
validation on tExpenseGLMatrix.EmployeeExpenseCode_ID
validation on tExpenseGLMatrix.ItemExpenseCode_ID
validation on tFADepreciationDet.CostGL_ID
validation on tFADepreciationDet.CumulativeGL_ID
validation on tGLOpenItem.GL_ID
validation on tGrossIncAcc.SalesCostCentre_ID
validation on tGrossIncAcc.SalesDivision_ID
validation on tGrossIncAcc.SalesProject_ID
validation on tGrossIncAcc.TaxPayableDivision_ID
validation on tMirroringGL.Company_ID
validation on tMirroringGL.Source1CostCentre_ID
validation on tMirroringGL.Source1Division_ID
validation on tMirroringGL.Source1Project_ID
validation on tMirroringGL.Source2CostCentre_ID
validation on tMirroringGL.Source2Division_ID
validation on tMirroringGL.Source2Project_ID
validation on tMirroringJournal.Company_ID
validation on tOIAdjustLn.CInvoice_ID
validation on tOIAdjustLn.DInvoice_ID
validation on tOIAdjustLn.JournalEntryPostingLine_ID
validation on tPaySelLineStage.CInvoiceStage_ID
validation on tPaySelLineStage.DInvoiceStage_ID
validation on tPaySelPayCode.PayFormatGroup_ID
validation on tPostingTemplate.Company_ID
validation on tRegion.Country_ID
validation on tSafStructureLink.CostCentre_ID
validation on tSafStructureLink.GL_ID
validation on tSafStructureLink.Project_ID
validation on tWHT.BankStateAlloc_ID
validation on tWHT.CACInvoice_ID
validation on tWHT.CDocumentInvoiceXref_ID
validation on tWHT.OIAdjustLn_ID


program code (program1/database.p)

    
    /* ValIntNotNULL: Validation-method that raises an error in case the integer-field has the NULL value */
    if iiTargetField = ?
    then do :
        <M-3 run SetMessage
           (input  #T-28'This field cannot have the unknown-value.':255(133401422)T-28# (icMessage), 
            input  '' (icArguments), 
            input  icTargetFieldName (icFieldName), 
            input  '' (icFieldValue), 
            input  'E':U (icType), 
            input  3 (iiSeverity), 
            input  icRowid (icRowid), 
            input  'qadfin-852205':U (icFcMsgNumber), 
            input  '' (icFcExplanation), 
            input  '' (icFcIdentification), 
            input  '' (icFcContext), 
            output oiReturnStatus (oiReturnStatus)) in database>  
        assign oiReturnStatus = -1.
    end. /* if iiTargetField = ? */