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

Package: Integrated Patient Fund

Routine: PRPFDAY


Information

PRPFDAY ;ALTOONA/CTB BALANCE ON SPECIFIED DAY ;3/7/97 2:44 PM

Source Information

Source file <PRPFDAY.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;3.0;PATIENT FUNDS;**6**;JUNE 1,1989
HDR
LOOP ;;LOOP THROUGH ALL PATIENTS FOR BALANCE IN ACCOUNTS ON SPECIFIED DATE
L1
ONE(DA,DATE) ;;EXTRINSIC FUNCTION RETURNS THE BALANCE IN THE ACCOUNT OF PATIENT (DA) AS OF 2359 HOURS ON THE DATE SPECIFIED (DATE)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,NAME," ",$P(X,"^",1)," ",$P(X,"^",2)," ",$P(X,"^",3)
  • Line Location: V+6
Function Call: WRITE
  • Prompt: !,"Patient Funds Balances as of "_$$DATE^PRPFU1(DATE),?(IOM-($L(PDATE)+1)),PDATE
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,?35,"LAST",?50,"COMPUTED",?65,"STORED"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?35,"TRANSACTION",?50,"BALANCE",?65,"BAL"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: " ***"
  • Line Location: L1+14
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: L1+14
Function Call: WRITE
  • Prompt: !!,?50,$J(TBAL,10,2),?65,$J(LTBAL,10,2)
  • Line Location: L1+17
Info |  Source |  Entry Points |  Interaction Calls