Routine: PRCF58A1

Information

PRCF58A1 ;WISC@ALTOONA/CTB-1358 ADJUSTMENT CONT ;4/30/93 3:02 PM

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

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