Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
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>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 6 NOW^%DTC  %XY^%RCR  FILE^DICN  (,IX1)^DIK  ^DIR  EN^DIU2  
Fee Basis 3 PAT^FBAACO  (FILEV,GETSVDT)^FBAACO5  $$DATX^FBAAUTL  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Fee Basis 1 FBPST35  

Entry Points

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

External References

Name Field # of Occurrence
NOW^%DTC END+1
%XY^%RCR MOVE+12
FILE^DICN MOVE+11
^DIK MOVE+16
IX1^DIK MOVE+14
^DIR ASK+1, ASK1, ASK1+1
EN^DIU2 DEL+1, DEL+2
PAT^FBAACO MOVE+8
FILEV^FBAACO5 MOVE+8
GETSVDT^FBAACO5 MOVE+8
$$DATX^FBAAUTL END+1

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
Routine Call
  • DIR
  • Line Location:
    • ASK+1
    • ASK1
    • ASK1+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FBAAC - [#162] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(161 DEL+4!
^DD(161.2 DEL+4!
^DD(161.27 DEL+4!
^DD(161.7 DEL+5!
^DD(161.8 DEL+6!
^DD(161.82 DEL+6!
^DD(163 FBPST35A+3, DEL+1
^DD(163.1 FBPST35A+3, DEL+2
^DD(2 DEL+6!
^DD(200 DEL+4!
^DD(50 DEL+5!
^DD(81 DEL+6!
^FBAA(163 FBPST35A+5, MOVE+3, MOVE+5, MOVE+7, MOVE+10

Label References

Name Line Occurrences
ABRT ASK+1
ASK ASK1, ABRT+1
ASK1 ASK1+1
DEL FBPST35A+5, ASK+1, MOVE
MOVE ASK1

Naked Globals

Name Field # of Occurrence
^(0 MOVE+7, MOVE+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % END+1
>> %X MOVE+12*
>> %Y MOVE+12*
DA MOVE+11!, MOVE+14*!, MOVE+16*!, END!
DA(1 MOVE+11*, MOVE+14*, MOVE+16*
DA(2 MOVE+11*, MOVE+14*, MOVE+16*
DA(3 MOVE+11*, MOVE+14*, MOVE+16*
DD MOVE+11!
DFN MOVE+3*, MOVE+5, MOVE+7, MOVE+8, MOVE+10, MOVE+11, MOVE+14, MOVE+16, END!
DIC MOVE+11*!, END!
DIC("P" MOVE+11*
DIC(0 MOVE+11*
DIK MOVE+14*!, MOVE+16*!, END!
DIR ASK+1!, ASK1!, ASK1+1!
DIR("?" ASK+1*
DIR("A" ASK*, ASK1*, ASK1+1*
DIR("B" ASK*, ASK1*
DIR(0 ASK*, ASK1*, ASK1+1*
>> DIRUT ASK+1, ASK1, ASK1+1
DIU DEL+1*, DEL+2*, END!
DIU(0 DEL+1*, DEL+2*
DO MOVE+11!
>> DTOUT ABRT+2
>> DUOUT ABRT+1
>> FBAACPI MOVE+11*, MOVE+14
FBAADT END!
>> FBAAOUT MOVE+8
FBARDT ASK1+1*, MOVE+7, END!
FBAUTH MOVE+7*, MOVE+8, END!
>> FBDDT MOVE+7*, MOVE+8
FBDEN ASK+2*, MOVE, END!
FBDSDI MOVE+7*, MOVE+10, MOVE+16, END!
>> FBJ MOVE+10*, MOVE+16
FBSDI MOVE+11, MOVE+14, END!
FBV MOVE+5*, MOVE+7, MOVE+8, MOVE+10, MOVE+11, MOVE+14, MOVE+16, END!
>> FBX MOVE+10*, MOVE+11
U MOVE*
>> X MOVE+11*
>> Y ASK+1, ASK1, ASK1+1, MOVE+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All