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

Package: Inpatient Medications

Routine: PSGFILD0


Information

PSGFILD0 ;BIR/CML3-SON OF VARIOUS FILES' UPKEEP ; 15 May 98 / 9:25 AM

Source Information

Source file <PSGFILD0.m>

Entry Points

Name Comments DBIA/ICR reference
ENDTE ; default team edit
ENOAOPT ; order action on patient transfer
ENSWT ; set-up discontinue on all ward transfers
SW ;
SW1 ;
SWTH ;
ENSUEP ; supervisor edit of user parameters
ENUUEP ;
ENIWPE ; edit inpatient ward parameters
ENOSD ; one-time stop date check
ENPDE ; edit primary drug
ENALU ; application look-up
ENAQ ; application query

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"NO TEAMS ENTERED TO CHOOSE FROM!"
  • Line Location: ENDTE+1
Function Call: WRITE
  • Prompt: !!,"Do you want the instructions for auto-discontinue set-up"
  • Line Location: ENSWT+1
Function Call: WRITE
  • Prompt: !!,"Do you want the package to set-up all of your wards for auto-discontinue"
  • Line Location: ENSWT+4
Function Call: WRITE
  • Prompt: !,PSGW(PSGX),"..."
  • Line Location: ENSWT+7
Function Call: WRITE
  • Prompt: "."
  • Line Location: SW1+1
Function Call: WRITE
  • Prompt: !?2,"Enter ""YES"" to have the package set-up all of your wards for auto-discontinue",!,"for you. Enter ""NO"" if you prefer to set-up the wards individually. Enter ""^""",!,"to abort the set-up."
  • Line Location: SWTH+1
Function Call: WRITE
  • Prompt: !!?2,"If you answer YES, you will still be able to add, edit and delete individual",!,"wards.",!!?2,"PLEASE NOTE that this is not a flag for the package, but a one-time action.",!,"If you add new wards to your WARD LOCATION file, you will"
  • Line Location: SWTH+2
Function Call: WRITE
  • Prompt: " need to add those",!,"wards here."
  • Line Location: SWTH+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ENSUEP+1
Function Call: READ
  • Variable: W
  • Timeout: X
  • Line Location: ENSUEP+4
Function Call: WRITE
  • Prompt: " and a "
  • Condition for execution: X
  • Line Location: ENSUEP+4
Function Call: WRITE
  • Prompt: "PROVIDER."
  • Line Location: ENSUEP+4
Function Call: WRITE
  • Prompt: !!,"PLEASE NOTE: Any changes made will not take effect for the corresponding users",!,"until those users completely exit and re-enter the system."
  • Line Location: ENSUEP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: ENUUEP+1
Function Call: READ
  • Variable: W
  • Timeout: X
  • Line Location: ENUUEP+4
Function Call: WRITE
  • Prompt: " and a "
  • Condition for execution: X
  • Line Location: ENUUEP+4
Function Call: WRITE
  • Prompt: "PROVIDER."
  • Line Location: ENUUEP+4
Function Call: WRITE
  • Prompt: !!,"PLEASE NOTE: Any changes made take effect immediately."
  • Line Location: ENUUEP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: ENIWPE+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(50.35 - [#50.35] Classic Fileman Calls
^PS(53.45 - [#53.45] Classic Fileman Calls
^PS(59.6 - [#59.6] Classic Fileman Calls
^PS(59.7 - [#59.7] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call