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 |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABSPOSPX

Package: Pharmacy Point of Sale

Routine: ABSPOSPX


Information

ABSPOSPX ; IHS/FCS/DRS - automatic writeoffs - criteria on form ; [ 09/12/2002 10:18 AM ]

Source Information

Source file <ABSPOSPX.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Pharmacy Point of Sale 2 ZWRITE^ABSPOS  IMPOSS^ABSPOSUE  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Point of Sale 1 ABSPOSPW  

Entry Points

Name Comments DBIA/ICR reference
INC2() ; a/r type
DIAG() ; find primary diagnosis for VSTDFN
INC6() ; clinic
OLD7 ; INSIEN for old-style INSCOV
INC10() ; include only if there's been a payment by current insurer
; useful, for example, if you want to write off Medicaid RX
; after getting whatever Medicaid paid
INC7() ; primary diagnosis
INC5() ; date of service
INSIEN() ; Insurer IEN
ACTIVBAT() ;EP - returns true if there's an active batch outstanding
; from this program's operation
INCLUDE()
INC4() ; aging date
INC3() ; balance
INC1() ; insurer

External References

Name Field # of Occurrence
ZWRITE^ABSPOS INC10+4, INC10+7, INC10+14, INC3+7
IMPOSS^ABSPOSUE INC1+8, INC2+4, INC2+8, INC6+7, INC7+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "."
  • Line Location: INCLUDE+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>70
  • Line Location: INCLUDE+2
Function Call: WRITE
  • Prompt: "Watching ",PCNDFN,": "
  • Line Location: INCLUDE+7
Function Call: WRITE
  • Prompt: 4," "
  • Line Location: INCLUDE+8
Function Call: WRITE
  • Prompt: 5," "
  • Line Location: INCLUDE+10
Function Call: WRITE
  • Prompt: 1," "
  • Line Location: INCLUDE+12
Function Call: WRITE
  • Prompt: 2," "
  • Line Location: INCLUDE+14
Function Call: WRITE
  • Prompt: 3," "
  • Line Location: INCLUDE+16
Function Call: WRITE
  • Prompt: 6," "
  • Line Location: INCLUDE+18
Function Call: WRITE
  • Prompt: 7," "
  • Line Location: INCLUDE+20
Function Call: WRITE
  • Prompt: 10," "
  • Line Location: INCLUDE+22
Function Call: WRITE
  • Prompt: "PASSED!",!
  • Line Location: INCLUDE+24
Function Call: WRITE
  • Prompt: "Examining payment node #",X,!
  • Line Location: INC10+11
Function Call: WRITE
  • Prompt: "BAL/ORIG=",BAL/ORIG,!
  • Line Location: INC3+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABSBITMS(9002302 INCLUDE+4, INC1+2, INSIEN+2, INSIEN+3, INSIEN+7, INSIEN+10, OLD7+1, OLD7+3, INC2+2, INC10+10
, INC10+13, INC3+4, INC3+5, INC4+2
^ABSBPMNT( ACTIVBAT+4, ACTIVBAT+5
^ABSBTYP("B" INC2+3
^ABSBV( DIAG+2, DIAG+3
^ABSP(9002313.99 - [#9002313.99] ACTIVBAT+2
^AUPNVPOV - [#9000010.07] DIAG+7
^AUPNVPOV("AD" DIAG+6
^AUPNVSIT - [#9000010] INC6+3, INC5+3
^AUTNINS("B" INSIEN+12

Label References

Name Line Occurrences
$$DIAG INC7+2
$$INC1 INCLUDE+13
$$INC10 INCLUDE+23
$$INC2 INCLUDE+15
$$INC3 INCLUDE+17
$$INC4 INCLUDE+9
$$INC5 INCLUDE+11
$$INC6 INCLUDE+19
$$INC7 INCLUDE+21
$$INSIEN INC1+3, INC10+6
OLD7 INSIEN+2

Naked Globals

Name Field # of Occurrence
^(0 DIAG+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BAL INC3+4~*, INC3+8, INC3+9, INC3+10, INC3+11, INC3+14
>> D0 INCLUDE+3
IEN INC1+3~*, INC1+4, INC2+3~*, INC2+4, INC2+5, DIAG+5~*, DIAG+6*, DIAG+7
INSIEN INC10+6~*, INC10+13
MAX INC3+1~, INC3+2*, INC3+3, INC3+11
MIN INC3+1~, INC3+2*, INC3+3, INC3+10
>> NINCLUDE INCLUDE+1*, INCLUDE+2
ONLIST INC1+4~*, INC1+5*, INC1+6, INC1+7, INC2+5~*, INC2+6, INC2+7, INC6+4*, INC6+5, INC6+6
, INC7+3*, INC7+4*, INC7+5, INC7+6
ORIG INC3+5~*, INC3+8, INC3+13, INC3+14
>> PARAMS INC1+1, INC1+6, INC1+7, INC1+8, INC2+1, INC2+6, INC2+7, INC2+8, INC6+1, INC6+5
, INC6+6, INC6+7, INC7+1, INC7+5, INC7+6, INC7+7, INC10+3, INC3+2, INC5+1
>> PARAMS("AGING DATE < THIS" , INC4+1
>> PARAMS("ARTYP" INC2+5
>> PARAMS("CLINIC" INC6+4
>> PARAMS("DIAG" INC7+4
>> PARAMS("INS" INC1+4
PCNDFN INCLUDE+3~*, INCLUDE+4, INCLUDE+6, INCLUDE+7, INC1+2, INSIEN+2, INSIEN+3, INSIEN+7, INSIEN+10, OLD7+1
, OLD7+3, INC2+2, INC10+10, INC10+13, INC3+4, INC3+5, INC4+2
PCT INC3+1~, INC3+2*, INC3+3, INC3+12, INC3+15
RET INC10+8~*, INC10+10, INC10+12*, INC10+13*, INC10+15
TYPE INC10+3~*, INC10+5, INC10+6, INC10+12
U INCLUDE+4, INC1+1, INC1+2, INC1+6, INC1+7, INSIEN+3, INSIEN+7, INSIEN+10, OLD7+4, OLD7+5
, INC2+1, INC2+2, INC2+6, INC2+7, INC6+1, INC6+3, INC6+5, INC6+6, INC7+1, INC7+5
, INC7+6, DIAG+3, DIAG+7, INC10+3, INC10+13, INC3+2, INC3+4, INC3+5, INC4+2, INC5+1
, INC5+3, ACTIVBAT+2, ACTIVBAT+5
VSTDFN INCLUDE+4~*, INC6+2, INC6+3, DIAG+1, DIAG+2, DIAG+3, DIAG+6, INC5+2, INC5+3
WATCH INCLUDE+5~, INCLUDE+6*, INCLUDE+7, INCLUDE+8, INCLUDE+10, INCLUDE+12, INCLUDE+14, INCLUDE+16, INCLUDE+18, INCLUDE+20
, INCLUDE+22, INCLUDE+24, INC10+4, INC10+7, INC10+11, INC10+14, INC3+6
X INC1+2~*, INSIEN+1~, INSIEN+7*, INSIEN+8, INSIEN+10*, INSIEN+11, INSIEN+12, OLD7+4*, OLD7+5*, OLD7+6*
, OLD7+7, INC2+2~*, INC2+3, INC2+4, INC6+3~*, INC6+4, INC7+2~*, INC7+3, INC7+4, DIAG+2~*
, DIAG+3, DIAG+6, DIAG+7*, DIAG+8, INC10+9~*, INC10+10*, INC10+11, INC10+13, INC3+14~*, INC3+15
, INC4+1~*, INC4+3, INC5+1~*, INC5+4, ACTIVBAT+2~*, ACTIVBAT+3, ACTIVBAT+4, ACTIVBAT+5, ACTIVBAT+7
Y INSIEN+3~*, INSIEN+4*, INSIEN+7, OLD7+1, OLD7+3, INC4+2~*, INC4+3, INC5+3~*, INC5+4, ACTIVBAT+5~*
, ACTIVBAT+6
Z OLD7+1~*, OLD7+2, OLD7+3, OLD7+4, OLD7+5
Z0 OLD7+3~*, OLD7+4, OLD7+5

Marked Items

Name Field # of Occurrence
$T( INC1+8, INC2+4, INC2+8, INC6+7, INC7+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All