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: PRCABP1

Package: Accounts Receivable

Routine: PRCABP1


Information

PRCABP1 ;SF-ISC/RSD-PRINT 1081 BILL ;4/6/94 3:13 PM

Source Information

Source file <PRCABP1.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;4.5;Accounts Receivable;**104,112**;Mar 20, 1995
ST
DES
ST2
Q
DT
HDR
LF
ADD
NEWP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ST+0
Function Call: WRITE
  • Prompt: !,"Standard Form 1081 (9-82)"
  • Line Location: ST+0
Function Call: WRITE
  • Prompt: ?39,"AMENDED BILL"
  • Condition for execution: $D(PRCAMEND)
  • Line Location: ST+0
Function Call: WRITE
  • Prompt: ?77,"Bill No. ",$P(PRCA0,U,1),!?3,"Dept. of the Treasury",?35,"VOUCHER AND SCHEDULE",?68,"Transaction Date: "
  • Line Location: ST+0
Function Call: WRITE
  • Prompt: !?3,"I TFRM 2-2500",?31,"OF WITHDRAWALS AND CREDITS",?73,"Document No. ",$P(PRCA10,U,8)
  • Line Location: ST+1
Function Call: WRITE
  • Prompt: !!,"Charge and credit will be reported on customer agency",!,"statement of transactions for account period ending _______________",!,PRCAUL,!,?17,"CUSTOMER AGENCY",?47,"|",?65,"BILLING AGENCY"
  • Line Location: ST+2
Function Call: WRITE
  • Prompt: !,"Location Code (ALC)",?23,"|",?28,"Voucher No.",?47,"| Location Code (ALC)",?71,"|",?76,"Voucher No."
  • Line Location: ST+3
Function Call: WRITE
  • Prompt: !?23,"|",?47,"| ",$S($P(PRCA10,U,3)]"":$P(PRCA10,U,3),1:""),?71,"| ",$S($P(PRCA10,U,4)]"":$P(PRCA10,U,4),1:""),!?23,"|",?47,"|",?71,"|",?96
  • Line Location: ST+4
Function Call: WRITE
  • Prompt: @IOBS
  • Line Location: ST+4
Function Call: WRITE
  • Prompt: PRCAUL,!,"Department Bureau Address",?47,"|",?50,"Department Bureau Address",!?47,"|"
  • Line Location: ST+5
Function Call: WRITE
  • Prompt: !?1
  • Line Location: ST+10
Function Call: WRITE
  • Prompt: X(I)
  • Condition for execution: $D(X(I))
  • Line Location: ST+10
Function Call: WRITE
  • Prompt: ?47,"| "
  • Line Location: ST+10
Function Call: WRITE
  • Prompt: X(I+5)
  • Condition for execution: $D(X(I+5))
  • Line Location: ST+10
Function Call: WRITE
  • Prompt: !,PRCAUL,!?20,"SUMMARY",?47,"|",?68,"SUMMARY",!,"Appro., Fund, or Receipt Symbol |",?36,"Amount",?47,"|Appro., Fund, or Receipt Symbol |",?85,"Amount",?96
  • Line Location: ST+11
Function Call: WRITE
  • Prompt: @IOBS
  • Line Location: ST+11
Function Call: WRITE
  • Prompt: !?32,"| ",$J($P(X,U,2),12,2),?47,"|",?55,$P(X,U,4),?81,"| ",$J($P(X,U,2),12,2)
  • Line Location: ST+12
Function Call: WRITE
  • Prompt: !,"(Must agree with Billing",?32,"|",$E(PRCAUL,1,14),"| (Must agree with Customer",?81,"|",$E(PRCAUL,1,14)
  • Line Location: ST+13
Function Call: WRITE
  • Prompt: !?6,"Agency total)",?26,"TOTAL ",$J($P(PRCA0,U,3),12,2),?47,"|",?54,"Agency total)",?75,"TOTAL ",$J($P(PRCA0,U,3),12,2)
  • Line Location: ST+14
Function Call: WRITE
  • Prompt: ?6,^UTILITY($J,"W",DIWL,PRCAKK,0),!
  • Line Location: DES+3
Function Call: WRITE
  • Prompt: !,"BILLING AGENCY CONTACT:",?48,"Approved By: "
  • Line Location: ST2+0
Function Call: WRITE
  • Prompt: $E(PRCAUL,1,30)
  • Condition for execution: Y=""
  • Line Location: ST2+0
Function Call: WRITE
  • Prompt: $P(^(20),U,2)
  • Line Location: ST2+0
Function Call: WRITE
  • Prompt: !,"Prepared By: "
  • Line Location: ST2+1
Function Call: WRITE
  • Prompt: $E(PRCAUL,1,30)
  • Condition for execution: X=""
  • Line Location: ST2+1
Function Call: WRITE
  • Prompt: "/ES/ "
  • Condition for execution: X]""
  • Line Location: ST2+1
Function Call: WRITE
  • Prompt: X
  • Line Location: ST2+1
Function Call: WRITE
  • Prompt: ?48,"Telephone No. ",PRCAT,!
  • Line Location: ST2+2
Function Call: WRITE
  • Prompt: PRCAUL,!
  • Line Location: ST2+3
Function Call: WRITE
  • Prompt: ?30,"CERTIFICATION OF CUSTOMER OFFICE",!!?5,"I certify that the items listed herein are correct and proper for payment from and to",!,"the appropriation(s) designated.",!!
  • Line Location: ST2+4
Function Call: WRITE
  • Prompt: $E(PRCAUL,1,30),?46,$E(PRCAUL,1,50),!,?12,"(Date)",?46,"(Authorized administrative or certifying officer)",!!,$E(PRCAUL,1,30),!?8,"(Telephone No.)",!,PRCAUL,!!
  • Line Location: ST2+5
Function Call: WRITE
  • Prompt: $$SLH^RCFN01(Y,"/")
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: !,PRCAUL,!,"Details of charges or reference to attached supporting documents",!!
  • Line Location: HDR+0
Function Call: WRITE
  • Prompt: !,?32,"|",?47,"|",?81,"|"
  • Line Location: LF+0
Function Call: WRITE
  • Prompt: ?21,"CONTINUED ON NEXT PAGE",!,PRCAUL,@IOF,!!?5,"(CONTINUATION OF BILL)",?75,"Bill No. ",$P(PRCA0,U,1),!!
  • Line Location: NEWP+0
Info |  Source |  Entry Points |  Interaction Calls