Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: FBUTL4

Package: Fee Basis

Routine: FBUTL4


Information

FBUTL4 ;WOIFO/SAB-FEE BASIS UTILITY ;7/6/2003

Source Information

Source file <FBUTL4.m>

Entry Points

Name Comments DBIA/ICR reference
RR(FBRRMK,FBMAX,FBDT,FBRRMKD,FBADJ) ; Prompt for Remittance Remarks
ASKRR ; multiply prompt for remarks
EXIT ;
DEL(FBADJ,FBI) ; delete remark from list
RRL(FBRRMK) ; build list of remittance remarks extrinsic function
; Input
; FBRRMK- required, array passed by reference
; array of remittance remarks
; format
; FBRRMK(ADJI,#)=FBRRMKC
; where
; ADJI = Adjustment Reason IEN
; # = integer number greater than 0
; FBRRMKC = remittance remark (internal value file 162.93)
; Result
; string containing sorted list (by external code) of remarks
; format
; FBRRMKCE 1, FBRRMKCE 2
; where
; FBRRMKCE = remittance remark code (external value)
  • ICR #5102
    • Status: Retired
    • Usage: Controlled Subscription

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,"Current list of Remittance Remarks: "
    • Line Location: ASKRR+4
    Function Call: WRITE
    • Prompt: "none"
    • Line Location: ASKRR+5
    Function Call: WRITE
    • Prompt: !
    • Line Location: ASKRR+8
    Function Call: WRITE
    • Prompt: !,$C(7)," Change was not accepted because the new value is already on the list."
    • Line Location: ASKRR+44
    Function Call: WRITE
    • Prompt: !!,$C(7),"ERROR: A new reason would exceed maximum number (",FBMAX,") allowed for this invoice."
    • Line Location: ASKRR+53
    Function Call: WRITE
    • Prompt: !," If necessary, a code on the current list can be selected and changed."
    • Line Location: ASKRR+54
    Function Call: WRITE
    • Prompt: !!,$C(7),"ERROR: Maximum number of remittance remark codes (",FBMAX,") have been exceeded."
    • Line Location: ASKRR+60
    Function Call: WRITE
    • Prompt: " (deleted)"
    • Line Location: DEL+4
    Info |  Source |  Entry Points |  Interaction Calls