Routine: PRCEADJ2

Information

PRCEADJ2 ;WISC/CLH/CTB-PRCEADJ1 CONT ; 21 Apr 93 8:32 AM

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Updating Obligation balances. Please hold...",!! Line Location: Y+1
Function Call: WRITE	Prompt: !,"ERROR IN CREATING 424 RECORD",$C(7),!! Line Location: Z+0
Function Call: WRITE	Prompt: @IOF,IOINLOW,"Adjustment Transaction # ",IOINHI,$P(TRNODE(0),"^"),IOINLOW," 1358 # ",IOINHI,$P(PO(0),"^") Line Location: SCREEN+2
Function Call: WRITE	Prompt: !!,IOINLOW,"Current amount obligated on 1358: ",IOINHI," $ ",$FN(CEILING,"P,",2) Line Location: SCREEN+3
Function Call: WRITE	Prompt: !!,IOINLOW," Total Authorizations: ",IOINHI," $ ",$J($FN(TAUTH,"P,",2),12) Line Location: SCREEN+4
Function Call: WRITE	Prompt: ?40,IOINLOW," Total Liquidations: ",IOINHI," $ ",$J($FN(LAUTH,",P",2),12) Line Location: SCREEN+5
Function Call: WRITE	Prompt: !,IOINLOW,"Authorization Balance: ",IOINHI," $ ",$J($FN(TBAL,"P,",2),12),?40,IOINLOW,"Liquidation Balance: ",IOINHI," $ ",$J($FN(LBAL,"P,",2),12),!! Line Location: SCREEN+6
Function Call: WRITE	Prompt: IOINLOW,"Amount of Adjustment: ",IOINHI,$J($P(TRNODE(4),"^",8),0,2),!!,IOINORM Line Location: SCREEN+7

FileNo	Call Tags
^PRC(424 - [#424]	Classic Fileman Calls