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

Package: Fee Basis

Routine: FBPST35A


Information

FBPST35A ;AISC/CMR-MERGE & DELETION OF DENIALS FILES ; JUN 15 1994

Source Information

Source file <FBPST35A.m>

Entry Points

Name Comments DBIA/ICR reference
ASK
ASK1
MOVE
DEL ;delete files 163 and 163.1
END
ABRT ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Post-Init FBPST35A has already been run."
  • Line Location: FBPST35A+3
Function Call: WRITE
  • Prompt: !!,"Beginning FBPST35A....",!!?20,"CONVERSION OF DENIALS FILES"
  • Line Location: FBPST35A+4
Function Call: WRITE
  • Prompt: !!,"Now I will move any Medical Denial information you wish to keep into the",!,"Fee Basis Payment File (#162). I will then remove the Fee Basis Medical",!,"Denials file (#163) and the Fee Basis Pharmacy Denials file (#163.1)."
  • Line Location: FBPST35A+6
Function Call: WRITE
  • Prompt: !!,"Do you want to keep any Medical Denials that are presently stored in the"
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"You may elect to merge all of your Fee Basis Medical Denials. If you",!,"choose not to retain all denials, you will be prompted to select a",!,"STARTING DATE to retain denials. Denials from the starting date to the"
  • Line Location: ASK+3
Function Call: WRITE
  • Prompt: !,"present date will be merged into file #162.",!!
  • Line Location: ASK+4
Function Call: WRITE
  • Prompt: !!?5,"Beginning merge"
  • Line Location: MOVE+1
Function Call: WRITE
  • Prompt: !!?5,"Deleting the Fee Basis Medical Denials file (#163)..."
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: !!?5,"Deleting the Fee Basis Pharmacy Denials file (#163.1)..."
  • Line Location: DEL+2
Function Call: WRITE
  • Prompt: !!?5,"Cleaning up DD nodes..."
  • Line Location: DEL+3
Function Call: WRITE
  • Prompt: !!,"Completed FBPST35A "
  • Line Location: END+1
Function Call: WRITE
  • Prompt: $$DATX^FBAAUTL(%)
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !!,*7,"Required Response!!"
  • Line Location: ABRT+1
Function Call: WRITE
  • Prompt: !!,*7,"Unable to complete the FBPST35A Post-Init routine. To complete this",!,"process, run ^FBPST35A as soon as possible."
  • Line Location: ABRT+2
Info |  Source |  Entry Points |  Interaction Calls