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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABSPOSS8

Package: Pharmacy Point of Sale

Routine: ABSPOSS8


Information

ABSPOSS8 ; IHS/FCS/DRS - 9002313.99 ;

Source Information

Source file <ABSPOSS8.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Pharmacy Point of Sale 5 ZWRITE^ABSPOS  LOG^ABSPOSL2  TEMPLATE^ABSPOSS2  $$YESNO^ABSPOSU3  $$IMPOSS^ABSPOSUE  
IHS VA Utilities 1 ^XBFMK  
VA Fileman 1 (,UPDATE)^DIE  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Pharmacy Point of Sale 2 ABSPOSS1  ABSPOSS3  

Entry Points

Name Comments DBIA/ICR reference
11
10
MOREEDIT()
N99A
ANYINUSE() ;EP - ABSPOSS1
RPTINUSE ;EP - ABSPOSS1
CHK1 ;Set out of order messages on the following options
INS ;EP - option ABSP INSURANCE SEL
PART1 ;EP - option ABSP SETUP PART 1 - the basic setup
YESNO(TEXT) ;EP - ABSPOSS3
NEW99 ; create new entry in 9002313.99
MYRULES()
ALLRULES()

External References

Name Field # of Occurrence
ZWRITE^ABSPOS N99A+7
LOG^ABSPOSL2 N99A+1
TEMPLATE^ABSPOSS2 10+3, RPTINUSE+1
$$YESNO^ABSPOSU3 YESNO+1
$$IMPOSS^ABSPOSUE N99A+8
^DIE PART1+10, PART1+16, PART1+24, CHK1+33, INS+10, INS+19, INS+27, INS+35, 10+13
UPDATE^DIE N99A
^XBFMK CHK1+23

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Edit Pharmacy POS configuration",!
  • Line Location: PART1+1
Function Call: WRITE
  • Prompt: !!,"Answer with '?' for help at any question.",!
  • Line Location: PART1+2
Function Call: WRITE
  • Prompt: !!,"Now set up the STANDARD Pricing Formula. (Different pricing",!
  • Line Location: PART1+18
Function Call: WRITE
  • Prompt: "policies for different insurers can be established later.)",!
  • Line Location: PART1+19
Function Call: WRITE
  • Prompt: !!,"The insurance selection ""grace period"" means that if the",!
  • Line Location: INS+3
Function Call: WRITE
  • Prompt: "registration data shows that insurance has expired, but the",!
  • Line Location: INS+4
Function Call: WRITE
  • Prompt: "expiration was within N days prior to the prescription fill",!
  • Line Location: INS+5
Function Call: WRITE
  • Prompt: "date, we assume that the coverage was renewed.",!
  • Line Location: INS+6
Function Call: WRITE
  • Prompt: "This is a system-wide default setting; you can override it later",!
  • Line Location: INS+7
Function Call: WRITE
  • Prompt: "on an insurer-by-insurer basis.",!
  • Line Location: INS+8
Function Call: WRITE
  • Prompt: !!,"Enter the base scores for each insurance type.",!
  • Line Location: INS+12
Function Call: WRITE
  • Prompt: !,"For example, if Private insurance is usually primary,",!
  • Line Location: INS+13
Function Call: WRITE
  • Prompt: ?10,"and Medicaid is secondary and Medicare is tertiary",!
  • Line Location: INS+14
Function Call: WRITE
  • Prompt: "then you might give Private 900 points, Medicaid 600 points,",!
  • Line Location: INS+15
Function Call: WRITE
  • Prompt: "Medicare and Railroad each 300 points and Self pay 100 points.",!
  • Line Location: INS+16
Function Call: WRITE
  • Prompt: !
  • Line Location: INS+17
Function Call: WRITE
  • Prompt: !!,"Enter the ICD10 default date for POS insurers."
  • Line Location: INS+22
Function Call: WRITE
  • Prompt: !,"You will have the ability to override this effective date"
  • Line Location: INS+23
Function Call: WRITE
  • Prompt: !,?5,"for the individual Insurer using the ADV option.",!
  • Line Location: INS+24
Function Call: WRITE
  • Prompt: !
  • Line Location: INS+25
Function Call: WRITE
  • Prompt: !!,"Enter the Maximum Dollar Limit."
  • Line Location: INS+30
Function Call: WRITE
  • Prompt: !,"Any Claim that is billed higher than this limit,"
  • Line Location: INS+31
Function Call: WRITE
  • Prompt: !,"will automatically be sent to paper for review.",!
  • Line Location: INS+32
Function Call: WRITE
  • Prompt: !
  • Line Location: INS+33
Function Call: WRITE
  • Prompt: !!,"Select any additional insurance rules that might",!
  • Line Location: 10+0
Function Call: WRITE
  • Prompt: "be needed for distinguishing among private insurances.",!
  • Line Location: 10+1
Function Call: WRITE
  • Prompt: !,"Usually, the plus points value for a rule is about 10 or 20",!
  • Line Location: 10+6
Function Call: WRITE
  • Prompt: "and the minus points value is 0."
  • Line Location: 10+7
Function Call: WRITE
  • Prompt: "If you need a new rule which isn't shown in the list,",!
  • Line Location: 10+8
Function Call: WRITE
  • Prompt: "the Point of Sale programmer will have to add it.",!
  • Line Location: 10+9
Function Call: WRITE
  • Prompt: "The INS RULE ORDER tells what order the rules are applied,",!
  • Line Location: 10+10
Function Call: WRITE
  • Prompt: "from low to high. 10, 20, 30, etc. are good choices for ORDER.",!
  • Line Location: 10+11
Function Call: WRITE
  • Prompt: !!,"This concludes the system-wide insurance setup.",!
  • Line Location: 10+17
Function Call: WRITE
  • Prompt: "Remember, there is another setup program to setup specific",!
  • Line Location: 10+18
Function Call: WRITE
  • Prompt: "insurers with their electronic formats, insurance selection",!
  • Line Location: 10+19
Function Call: WRITE
  • Prompt: "settings, grace period override, etc.",!
  • Line Location: 10+20
Routine Call
  • DIE
  • Line Location:
    • N99A
Routine Call
  • DIE
  • Line Location:
    • PART1+10
    • PART1+16
    • PART1+24
    • CHK1+33
    • INS+10
    • INS+19
    • INS+27
    • INS+35
    • 10+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABSP(9002313.99 - [#9002313.99] PART1+12, NEW99+1, N99A+2, N99A+5*, CHK1+19, ANYINUSE+1
^DIC(19 - [#19] CHK1+25, CHK1+27

Label References

Name Line Occurrences
$$ALLRULES 10+2
$$ANYINUSE 10+14
$$MOREEDIT 10+15
$$MYRULES 10+5, 10+14
$$YESNO ALLRULES, MYRULES, MOREEDIT
10 10+2, 10+5
11 10+15
N99A N99A+8
NEW99 PART1+3
RPTINUSE 10+5, 10+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% 10+21~*
>> ABSP3PB PART1+12*, PART1+13
ALLRULES INS+37~, 11*, 10+2, 10+4*
DA PART1+4~, PART1+5*, PART1+14*, PART1+20*, CHK1+31*, INS+1~, INS+2*, 10+12*
DIDEL PART1+4~, INS+1~
DIE PART1+4~, PART1+5*, PART1+14*, PART1+20*, CHK1+31*, INS+1~, INS+2*, 10+12*
DR PART1+4~, PART1+6*, PART1+7*, PART1+8*, PART1+9*, PART1+15*, PART1+21*, PART1+22*, PART1+23*, CHK1+32*
, INS+1~, INS+9*, INS+18*, INS+26*, INS+34*, 10+12*
DTOUT PART1+4~, INS+1~
FDA NEW99+2~
FDA( NEW99+3*, NEW99+4*
IEN NEW99+2~
IEN(1 N99A+2
MSG NEW99+2~, N99A+1, N99A+2
MYRULES INS+37~, 11*, 10+5*
OPTCNT CHK1+7~, CHK1+22*, CHK1+25
OPTIEN CHK1+7~, CHK1+24*, CHK1+25*, CHK1+26, CHK1+27, CHK1+31
OPTMSG CHK1+7~, CHK1+19*, CHK1+20*, CHK1+28, CHK1+29, CHK1+30
OPTMSG2 CHK1+7~, CHK1+27*, CHK1+28, CHK1+29, CHK1+30
OPTNAME CHK1+7~
OPTNAME( CHK1+25
OPTNAME(1 CHK1+9*
OPTNAME(2 CHK1+10*
OPTNAME(3 CHK1+11*
OPTNAME(4 CHK1+12*
OPTNAME(5 CHK1+13*
OPTNAME(6 CHK1+14*
OPTNAME(7 CHK1+15*
OPTNAME(8 CHK1+16*
OPTNAME(9 CHK1+17*
TEXT YESNO~, YESNO+1
U PART1+12, NEW99+1, CHK1+27

Marked Items

Name Field # of Occurrence
$T( N99A+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All