Routine: PRCFFUA1

Information

PRCFFUA1 ;WISC/SJG-ROUTINE TO PROCESS OBLIGATIONS ;4/27/94 11:30

Name	Comments	DBIA/ICR reference
V	;;5.1;IFCAP;;Oct 20, 2000
SC	; Display Obligation Data
CPBAL	; Display Control Point Offical's Balance
HDR	; Display header
ORG	; Display original info
GET	; Display amended BOC info
GETAMD
GETORG
SF1	; Line item roll-up into BOCs for amendment

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: SC+3
Function Call: WRITE	Prompt: !!?(IOM-37\2),PRCFA("IDES")_" - "_$P(PO(0),"^"),!!," COST CENTER: "_$P(PO(0),"^",5),?IOM\2-4,"CONTROL POINT: "_$P(PO(0),"^",3) Line Location: SC+4
Function Call: WRITE	Prompt: !! Line Location: SC+12
Function Call: WRITE	Prompt: !!,"Net Cost of Order: ",?30,"$",$J($P(PO(0),U,16),10,2) Line Location: SC+17
Function Call: WRITE	Prompt: !!,"Net Cost of Order: ",?30,"$",$J($P(PO(0),U,16),10,2) Line Location: CPBAL+2
Function Call: WRITE	Prompt: !!,"Fiscal Status of Funds for Control Point" Line Location: CPBAL+4
Function Call: WRITE	Prompt: !!,"Status of Funds Balance: ",?30,"$",$J($P(^PRC(420,PRC("SITE"),1,+$P(PO(0),U,3),0),U,7),10,2),!,"Estimated Balance:",?30,"$",$J($P(^(0),U,8),10,2) Line Location: CPBAL+4
Function Call: WRITE	Prompt: !! Line Location: ORG+1
Function Call: WRITE	Prompt: ! Line Location: ORG+4
Function Call: WRITE	Prompt: ! Line Location: GET+4
Function Call: WRITE	Prompt: ! Line Location: GET+4
Function Call: WRITE	Prompt: !,?8,^(J,0) Line Location: GETORG+3
Function Call: WRITE	Prompt: !?8,^(J,0) Line Location: GETORG+8