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 |  Local Variables |  All
Print Page as PDF
Routine: ABSPOSBB

Package: Pharmacy Point of Sale

Routine: ABSPOSBB


Information

ABSPOSBB ; IHS/FCS/DRS - POS billing - new ; [ 03/14/2003 11:18 AM ]

Source Information

Source file <ABSPOSBB.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
Pharmacy Point of Sale 11 $$NFF^ABSPECFM  REJTEXT^ABSPOS03  ($$ARSYSTEM,ZW)^ABSPOSB  SETFLAG^ABSPOSBC  $$POST^ABSPOSBP  $$POST^ABSPOSBQ  $$POST^ABSPOSBT  $$POST^ABSPOSBW  
LOG^ABSPOSL  LOG^ABSPOSL2  $$CATEG^ABSPOSUC  
VA Fileman 3 NOW^%DTC  (,FILE)^DIE  $$GET1^DIQ  
Third Party Billing 1 ($$CAN,$$EN)^ABMPSAPI  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Pharmacy Point of Sale 3 ABSPOSBD  ABSPOSJ2  ABSPOSM1  

Entry Points

Name Comments DBIA/ICR reference
LAST57(RXI,RXR) ;EP -
POSTING ; EP - for _all_ billing interfaces - with ABSP57
; Based on the billing interface, call the right routine.
GETINSINFO(TX) ; /IHS/OIT/RAM ; 18 MAY 2017 - P48 - new routine to gather all the insurance information.
ZW(%)
VMEDSTAT(VMEDDFN,STAT) ;
UPDT ;
THIRD()
POSTIT(ABSPRJCT)
TIMEOUT()
PREVIOUS(N57) ;EP -
; Get Previous transaction for this RX and Refill
; N57 = TX = IEN to Log of Transactions file (A/R Posting)
REVERSIT
PROCTMOT(ABSPRP,ABSPREC) ;IHS/SD/lwj 7/7/04 need to check to see if the
; processor timed out - this is a different response from
; the switch time out
; ABSPPIC - rx order within response
; ABSPRXR - rej codes per rx
; ABSPTIMO - time out ind for resp
; ABSPRP - prev resp IEN (passed in)
; ABSPREC - prev log of tran IEN

External References

Name Field # of Occurrence
NOW^%DTC GETINSINFO+4
$$CAN^ABMPSAPI REVERSIT+28
$$EN^ABMPSAPI POSTIT+60
$$NFF^ABSPECFM POSTIT+57
REJTEXT^ABSPOS03 THIRD+51
$$ARSYSTEM^ABSPOSB POSTING+2
ZW^ABSPOSB ZW
SETFLAG^ABSPOSBC REVERSIT+31, POSTIT+12, POSTIT+61
$$POST^ABSPOSBP POSTING+13
$$POST^ABSPOSBQ POSTING+15
$$POST^ABSPOSBT POSTING+9
$$POST^ABSPOSBW POSTING+5
LOG^ABSPOSL REVERSIT+19, POSTIT+59
LOG^ABSPOSL2 POSTING+24
$$CATEG^ABSPOSUC THIRD+23
^DIE VMEDSTAT+9
FILE^DIE POSTING+23
$$GET1^DIQ THIRD+9, THIRD+12, THIRD+13, THIRD+14, THIRD+32, THIRD+36, REVERSIT+7, REVERSIT+10, REVERSIT+15, REVERSIT+17
, REVERSIT+25, POSTIT+4, POSTIT+6, POSTIT+9, POSTIT+10, POSTIT+15, POSTIT+16, POSTIT+18, POSTIT+19, POSTIT+20
, POSTIT+21, POSTIT+22, POSTIT+23, POSTIT+24, POSTIT+25, POSTIT+26, POSTIT+27, POSTIT+28, POSTIT+50, PROCTMOT+11
, GETINSINFO+12, GETINSINFO+13, GETINSINFO+14, GETINSINFO+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "ABSPPINNO: ",ABSPPINNO," ABSPPINSIEN: ",ABSPINSIEN,!
  • Line Location: GETINSINFO+17
Function Call: WRITE
  • Prompt: "ABSPTODAY: ",ABSPTODAY," TESTING: ",I," BEG: ",BEG," END: ",END,!
  • Line Location: GETINSINFO+33
Function Call: WRITE
  • Prompt: "FLERM.",!
  • Line Location: GETINSINFO+34
Routine Call
  • DIE
  • Line Location:
    • VMEDSTAT+9
Routine Call
  • DIE
  • Line Location:
    • POSTING+23

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] GET1^DIQ
^AUPNVSIT - [#9000010] GET1^DIQ
^ABSPTL - [#9002313.57] GET1^DIQ
^ABSP(9002313.99 - [#9002313.99] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABSPR - [#9002313.03] THIRD+53, TIMEOUT+25, TIMEOUT+29, TIMEOUT+30, PROCTMOT+13, PROCTMOT+14
^ABSPTL - [#9002313.57] THIRD+10, THIRD+49, THIRD+50, REVERSIT+4, REVERSIT+6, PREVIOUS+4, PREVIOUS+5, TIMEOUT+18, TIMEOUT+22, TIMEOUT+23
, TIMEOUT+24, TIMEOUT+26
^ABSPTL("B" TIMEOUT+19
^ABSPTL("NON-FILEMAN" PREVIOUS+7, LAST57+1
^AUPNMCD - [#9000004] GETINSINFO+31, GETINSINFO+32
^AUPNVSIT - [#9000010] REVERSIT+18, POSTIT+7
^DD(9000010.14 VMEDSTAT+7
^PSRX - [#52] THIRD+18, THIRD+20

Label References

Name Line Occurrences
$$GETINSINFO POSTIT+30
$$POSTIT THIRD+74
$$PREVIOUS REVERSIT+2
$$PROCTMOT TIMEOUT+33
$$THIRD POSTING+11
$$TIMEOUT THIRD+68
POSTIT THIRD+32
REVERSIT THIRD+36, THIRD+70
VMEDSTAT THIRD+44, THIRD+69, THIRD+71, THIRD+72

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ZW~
>> ABSCAN REVERSIT+28*
>> ABSP POSTIT+60
>> ABSP( POSTIT+4*, POSTIT+5*, POSTIT+6*, POSTIT+7*, POSTIT+8*, POSTIT+9*, POSTIT+10*, POSTIT+11, POSTIT+14*, POSTIT+15*
, POSTIT+16*
>> ABSP("ADJ CAT " , REVERSIT+13*
>> ABSP("ADJ TYP E" , REVERSIT+14*
>> ABSP("ARLOC" REVERSIT+11*, REVERSIT+28, REVERSIT+33
>> ABSP("CREDIT" REVERSIT+10*
>> ABSP("OTHIDENT" POSTIT+55*, POSTIT+56*, POSTIT+57*
>> ABSP("TRAN TY PE" , REVERSIT+12*
>> ABSP("USER" REVERSIT+15*
>> ABSP(11 POSTIT+17*
>> ABSP(13 POSTIT+37*
>> ABSP(23 POSTIT+19*, POSTIT+20*, POSTIT+21*, POSTIT+22*, POSTIT+23*, POSTIT+24*, POSTIT+26*, POSTIT+27*, POSTIT+28*
>> ABSP(41 POSTIT+18*
>> ABSP(73 POSTIT+42*, POSTIT+44*, POSTIT+45*
>> ABSP(99 POSTIT+52*
>> ABSP57 POSTING+22, THIRD+2, REVERSIT+19, REVERSIT+31, POSTIT+12, POSTIT+59, POSTIT+61
ABSP59 POSTIT+49~, POSTIT+50*, POSTIT+51
ABSPARAM THIRD+8~, THIRD+9*, THIRD+45, THIRD+47
ABSPCNT THIRD+48~, THIRD+54*, THIRD+55*, THIRD+56, THIRD+57, THIRD+58, THIRD+59, THIRD+60, THIRD+61, THIRD+62
, THIRD+63, POSTIT+2~, POSTIT+41*, POSTIT+43*, POSTIT+44, POSTIT+45
ABSPELIGIEN GETINSINFO+1~, GETINSINFO+21*, GETINSINFO+28, GETINSINFO+31, GETINSINFO+32
ABSPENT TIMEOUT+16~, TIMEOUT+18*, TIMEOUT+19
ABSPINS POSTIT+3~, POSTIT+30*, POSTIT+37
ABSPINSIEN GETINSINFO+1~, GETINSINFO+13*, GETINSINFO+14*, GETINSINFO+15*, GETINSINFO+17, GETINSINFO+19
ABSPMSG TIMEOUT+16~, TIMEOUT+30*, TIMEOUT+36
ABSPMULT GETINSINFO+1~, GETINSINFO+22*, GETINSINFO+23, GETINSINFO+24, GETINSINFO+25, GETINSINFO+29
ABSPOST THIRD+6~, THIRD+74*, THIRD+75, POSTIT+1~, POSTIT+60*, POSTIT+62
ABSPPIC PROCTMOT+8~, PROCTMOT+11*, PROCTMOT+12, PROCTMOT+13, PROCTMOT+14
ABSPPINDATA GETINSINFO+1~, GETINSINFO+2*, GETINSINFO+13*, GETINSINFO+14*, GETINSINFO+15*, GETINSINFO+18, GETINSINFO+20, GETINSINFO+21, GETINSINFO+22
ABSPPINNO GETINSINFO+1~, GETINSINFO+12*, GETINSINFO+13, GETINSINFO+14, GETINSINFO+15, GETINSINFO+17
ABSPPINTYPE GETINSINFO+1~, GETINSINFO+20*, GETINSINFO+23, GETINSINFO+24, GETINSINFO+25, GETINSINFO+26
ABSPPOS THIRD+48~, THIRD+50*, THIRD+51
ABSPPTYP POSTIT+49~, POSTIT+51*, POSTIT+52
ABSPQUIT THIRD+7~, THIRD+41*, THIRD+45*, THIRD+46*, THIRD+55, THIRD+57*, THIRD+58*, THIRD+59*, THIRD+60*, THIRD+61*
, THIRD+62*, THIRD+65*, THIRD+66
ABSPRC TIMEOUT+16~, TIMEOUT+24*, TIMEOUT+25
ABSPREC TIMEOUT+16~, TIMEOUT+19*, TIMEOUT+21, TIMEOUT+22, TIMEOUT+23, TIMEOUT+26, TIMEOUT+33, PROCTMOT~, PROCTMOT+9, PROCTMOT+11
ABSPREJS THIRD+48~, THIRD+51
ABSPREJS( THIRD+55, THIRD+56, THIRD+63
ABSPRETURN GETINSINFO+1~, GETINSINFO+3*, GETINSINFO+19*, GETINSINFO+23*, GETINSINFO+24*, GETINSINFO+25*, GETINSINFO+28*, GETINSINFO+29*, GETINSINFO+34*, GETINSINFO+35*
, GETINSINFO+40
ABSPRJCT THIRD+7~, THIRD+74, POSTIT~
ABSPRJCT( THIRD+56*, THIRD+57, THIRD+58, THIRD+59, THIRD+60, THIRD+61, THIRD+62, THIRD+63*, POSTIT+43, POSTIT+44
, POSTIT+45
ABSPRJCT("RJCTIME" THIRD+53*, POSTIT+40, POSTIT+42
ABSPRP TIMEOUT+16~, TIMEOUT+26*, TIMEOUT+28, TIMEOUT+29, TIMEOUT+30, TIMEOUT+33, PROCTMOT~, PROCTMOT+9, PROCTMOT+13, PROCTMOT+14
ABSPRSP THIRD+48~, THIRD+49*, THIRD+51, THIRD+53
>> ABSPRX REVERSIT+7*, REVERSIT+8
ABSPRXR PROCTMOT+8~, PROCTMOT+10*, PROCTMOT+13*, PROCTMOT+14
ABSPRXRN REVERSIT+24~, REVERSIT+25*, REVERSIT+28
ABSPTIMO PROCTMOT+8~, PROCTMOT+10*, PROCTMOT+12, PROCTMOT+14*, PROCTMOT+15
ABSPTODAY GETINSINFO+1~, GETINSINFO+4*, GETINSINFO+33, GETINSINFO+34, GETINSINFO+35
ACCT THIRD+3~
AMT THIRD+3~
BEG GETINSINFO+1~, GETINSINFO+32*, GETINSINFO+33, GETINSINFO+34, GETINSINFO+35
CAT THIRD+4~, THIRD+23*, THIRD+32, THIRD+34, THIRD+37, THIRD+42, THIRD+65, THIRD+68, THIRD+69, THIRD+70
, THIRD+71, THIRD+72
CLINIC THIRD+3~
DA THIRD+4~, THIRD+34, THIRD+35*, THIRD+70, REVERSIT+3*, REVERSIT+4*, REVERSIT+5, REVERSIT+11, REVERSIT+33*, POSTIT+62*
, UPDT+1, VMEDSTAT+8*
DIE REVERSIT+1~, VMEDSTAT+8*
DISP THIRD+3~
DR REVERSIT+1~, VMEDSTAT+8*
DRUG THIRD+4~
END GETINSINFO+1~, GETINSINFO+32*, GETINSINFO+33, GETINSINFO+34, GETINSINFO+35
FDA POSTING+21~
FDA( POSTING+22*
>> GO GETINSINFO+31*, GETINSINFO+34*, GETINSINFO+35*
I GETINSINFO+1~, GETINSINFO+31*, GETINSINFO+32, GETINSINFO+33, GETINSINFO+34, GETINSINFO+35
I2 GETINSINFO+1~
I3 GETINSINFO+1~
IEN POSTING+21~
INSDFN THIRD+3~, THIRD+14*, THIRD+15, POSTIT+14
INSNAM THIRD+4~
LOC THIRD+3~, REVERSIT+16~, REVERSIT+17*
MSG POSTING+21~, POSTING+24
N57 PREVIOUS~, PREVIOUS+4, PREVIOUS+5, PREVIOUS+7
NDC THIRD+4~
PATDFN THIRD+3~
PRCTO TIMEOUT+17~, TIMEOUT+32*, TIMEOUT+33*, TIMEOUT+36
PRV THIRD+3~
PRVTX REVERSIT+1~, REVERSIT+2*, REVERSIT+3, REVERSIT+4, REVERSIT+6, REVERSIT+10, REVERSIT+15
QTY THIRD+3~
RESULT POSTING+3~, POSTING+5*, POSTING+7*, POSTING+9*, POSTING+11*, POSTING+13*, POSTING+15*, POSTING+17*, POSTING+20, POSTING+22
RXI THIRD+3~, THIRD+13*, THIRD+18, THIRD+20, REVERSIT+6*, REVERSIT+7, POSTIT+18, POSTIT+25*, POSTIT+26, POSTIT+55
, POSTIT+56, PREVIOUS+3~, PREVIOUS+4*, PREVIOUS+6, PREVIOUS+7, LAST57~, LAST57+1
RXR THIRD+4~, THIRD+12*, THIRD+17, THIRD+18, PREVIOUS+3~, PREVIOUS+5*, PREVIOUS+6, PREVIOUS+7, LAST57~, LAST57+1
STAT VMEDSTAT~
TX THIRD+1~, THIRD+2*, THIRD+10, THIRD+12, THIRD+13, THIRD+14, THIRD+23, THIRD+49, THIRD+50, REVERSIT+2
, REVERSIT+25, POSTIT+4, POSTIT+6, POSTIT+15, POSTIT+16, POSTIT+19, POSTIT+20, POSTIT+21, POSTIT+22, POSTIT+23
, POSTIT+24, POSTIT+25, POSTIT+27, POSTIT+28, POSTIT+30, POSTIT+50, TIMEOUT+18, TIMEOUT+19, TIMEOUT+24, GETINSINFO~
, GETINSINFO+12, GETINSINFO+13, GETINSINFO+14, GETINSINFO+15
U THIRD+10, THIRD+18, THIRD+20, THIRD+49, THIRD+50, REVERSIT+4, REVERSIT+6, REVERSIT+18, POSTIT+7, POSTIT+37
, PREVIOUS+4, PREVIOUS+5, TIMEOUT+18, TIMEOUT+22, TIMEOUT+23, TIMEOUT+24, TIMEOUT+25, TIMEOUT+26, TIMEOUT+29, TIMEOUT+30
, PROCTMOT+14, GETINSINFO+19, GETINSINFO+23, GETINSINFO+24, GETINSINFO+25, GETINSINFO+28, GETINSINFO+29, GETINSINFO+32, GETINSINFO+34, GETINSINFO+35
UNIT THIRD+3~
VDATE THIRD+3~
VISDT REVERSIT+16~, REVERSIT+18*
VMEDDFN THIRD+5~, THIRD+18*, THIRD+20*, THIRD+44, THIRD+69, THIRD+71, THIRD+72, VMEDSTAT~, VMEDSTAT+6, VMEDSTAT+8
VSTDFN THIRD+4~, THIRD+10*, THIRD+11, REVERSIT+17, REVERSIT+18, POSTIT+7, POSTIT+9, POSTIT+10, POSTIT+17
X POSTING+2~*, POSTING+4, POSTING+6, POSTING+8, POSTING+10, POSTING+12, POSTING+14, GETINSINFO+4
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 |  Local Variables |  All