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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PRPFTAT

Package: Integrated Patient Fund

Routine: PRPFTAT


Information

PRPFTAT ;ALTOONA/CTB REVIEW STATUS ON ALL PATIENT FUNDS ACCOUNTS ;4/25/97 8:29 PM

Source Information

Source file <PRPFTAT.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;3.0;PATIENT FUNDS;**6**;JUNE 1, 1989
UPDAT
OUT
ALL ;;UPDATE THE 'ACTIVE'/'INACTIVE' STATUS OF ALL ACCOUNTS
CHECK ;THIS LINE CHECKS THE CURRENT STATUS OF THE ACCOUNT AND UPDATES THE
CR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This routine will insert the Active/Inactive indicator into the file for",!,"each patient based upon the following:",!!?5,"Balance not zero - ACTIVE"
  • Line Location: UPDAT+0
Function Call: WRITE
  • Prompt: !?5,"Zero Balance - Last Transaction less than 30 days - ACTIVE"
  • Line Location: UPDAT+1
Function Call: WRITE
  • Prompt: !?5,"Zero Balance - Last Transaction more than 30 days - INACTIVE"
  • Line Location: UPDAT+2
Function Call: WRITE
  • Prompt: !?5,"Zero Balance - No Transactions - INACTIVE"
  • Line Location: UPDAT+3
Function Call: WRITE
  • Prompt: !!,"The system will automatically convert the status to ACTIVE when any transaction",!,"is entered into the account."
  • Line Location: UPDAT+4
Function Call: WRITE
  • Prompt: " Finally, this program will print a report showing all accounts on which the STATUS was changed.",!
  • Line Location: UPDAT+5
Function Call: WRITE
  • Prompt: @IOF,!,"PATIENT FUNDS CHANGE IN ACCOUNT STATUS LISTING"
  • Line Location: ALL+4
Function Call: WRITE
  • Prompt: ?$X+10,Y,!!,"No change required in any account."
  • Line Location: ALL+4
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $D(ZTSK)
  • Line Location: ALL+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRPF(470 - [#470] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call