IFS client development <centura> 前端 Call 後端 API(1)

admin

以預開發票為例<GUIInvoice.apl>

Function: Get_Address1
        Description:
        Returns
                Boolean:
        Parameters
        Static Variables
        Local variables
        Actions
                If Security.IsMethodAvailable('CUSTOMER_INFO_ADDRESS_API.Get_Default_Address1')
                        Call DbPLSQLBlock( c_hSql, sFullName || ".mlAddress :=  &AO.customer_info_address_api.get_default_address1(" || sFullName || ".dfsIdentity ,'Document' ) ")
                Return TRUE

Function: Get_Association_No
        Description:
        Returns
                Boolean:
        Parameters
        Static Variables
        Local variables
        Actions
                If Security.IsMethodAvailable('CUSTOMER_INFO_API.Get_Association_No')
                        Call DbPLSQLBlock( c_hSql, sFullName || ".dfsVatNo := &AO.CUSTOMER_INFO_API.Get_Association_No(
                                        " || sFullName || ".dfsIdentity )")
                        If dfsGuiFormat  ='32'
                                Set dfsVatNo=' '
                Return TRUE

Function: Get_Fee_Description
        Description:
        Returns
                Boolean:
        Parameters
        Static Variables
        Local variables
        Actions
                If Security.IsMethodAvailable('STATUTORY_FEE_API.Get_Description')
                        Call DbPLSQLBlock( c_hSql, sFullName || ".dfFeeDescription := SUBSTRB( &AO.STATUTORY_FEE_API.Get_Description(
                                        " || sFullName || ".dfsCompany,
                                        " || sFullName || ".dfsFeeCode ),1,20)")
                Return TRUE

Function: Get_Fee_Rate
        Description:
        Returns
                Boolean:
        Parameters
        Static Variables
        Local variables
        Actions
                If Security.IsMethodAvailable('STATUTORY_FEE_API.Get_Fee_Rate')
                        Call DbPLSQLBlock( c_hSql, sFullName || ".dfnPercentage :=  &AO.STATUTORY_FEE_API.Get_Fee_Rate(
                                        " || sFullName || ".dfsCompany,
                                        " || sFullName || ".dfsFeeCode )")
                Return TRUE

Function: Get_GuiFormat_Description
        Description:
        Returns
                Boolean:
        Parameters
        Static Variables
        Local variables
        Actions
                If Security.IsMethodAvailable('GUI_FORMAT_API.Get_Description')
                        Call DbPLSQLBlock( c_hSql, sFullName || ".dfsGuiFormatDescription := &AO.GUI_FORMAT_API.Get_Description(
                                        " || sFullName || ".dfsCompany,
                                        " || sFullName || ".dfsGuiFormat )")
                Return TRUE