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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABSPOSZ

Package: Pharmacy Point of Sale

Routine: ABSPOSZ


Information

ABSPOSZ ; IHS/FCS/DRS - Upgrades ;

Source Information

Source file <ABSPOSZ.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 ^%DTC  $$FIND1^DIC  (FILE,UPDATE)^DIE  
Pharmacy Point of Sale 2 ZWRITE^ABSPOS  LOG^ABSPOSL2  

Entry Points

Name Comments DBIA/ICR reference
PRE ; Pre-installation procedure, pointed to by .KID file
; If you have renamed any 9002313.92 entries, ; look up the existing ones at this site and rename them.
; Otherwise, resolving of pointers will fail, won't it?
T1()
CLOVERLF ;161.223.90.56^5006
T1ADDR ; the "ENVOY DIRECT VIA T1 LINE" dialout - make sure it has the
; latest and correct address and port information
T1VALUES ;199.244.222.6^6802
HASILCAR() ; does the site have ILC A/R installed and active?
; This is for use only by installation procedure!
; Look at the most recently created bill. See if it was in the
; past week or so.
ANMC ; Special for ANMC
; Rename the receipt protocol
; Lookup the ABSP P1 RECEIPT protocol
; and change its ITEM TEXT (#1) to "Print DUR data"
POST ; Post-installation procedure, pointed to by .KID file
INIT58 ; Make sure there's an entry in file 9002313.58
BILLMENU ; If so, then on the main menu ABSPMENU,
; change the ITEM named ABSP BILLING MENU
; to ABSP BILLING MENU FOR ILC A/R
T1NAME()

External References

Name Field # of Occurrence
^%DTC HASILCAR+8
ZWRITE^ABSPOS ANMC+11, ANMC+29, BILLMENU+15
LOG^ABSPOSL2 ANMC+10, ANMC+28, BILLMENU+12, INIT58+5
$$FIND1^DIC ANMC+5, ANMC+20, ANMC+24, BILLMENU+5, BILLMENU+8
FILE^DIE ANMC+9, ANMC+27, BILLMENU+11
UPDATE^DIE INIT58+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There is no dial out named ",$$T1NAME,!
  • Line Location: T1ADDR+3
Function Call: WRITE
  • Prompt: !!,"Updating your settings for the ",$$T1NAME," dial out...",!
  • Line Location: T1ADDR+22
Function Call: WRITE
  • Prompt: "Changing the IP address from ",$P(X,U)," to ",$P(Y,U),!
  • Line Location: T1ADDR+24
Function Call: WRITE
  • Prompt: "Changing the TCP port from ",$P(X,U,2)," to ",$P(Y,U,2),!
  • Line Location: T1ADDR+26
Function Call: WRITE
  • Prompt: "Setting the TCP port to ",$P(Y,U,2),!
  • Line Location: T1ADDR+29
Function Call: WRITE
  • Prompt: !,"Settings for ",$$T1NAME," have been updated.",!
  • Line Location: T1ADDR+32
Function Call: WRITE
  • Prompt: !
  • Line Location: T1ADDR+33
Function Call: WRITE
  • Prompt: "If you customized any dial outs to also point to the T1 address",!
  • Line Location: T1ADDR+34
Function Call: WRITE
  • Prompt: "and port, you will need to update those manually using the",!
  • Line Location: T1ADDR+35
Function Call: WRITE
  • Prompt: "MGR/SET/DIAL menu to set up the dial outs.",!
  • Line Location: T1ADDR+36
Function Call: WRITE
  • Prompt: !,"Renaming the ABSP P1 RECEIPT protocol's ITEM TEXT...",!
  • Line Location: ANMC+4
Function Call: WRITE
  • Prompt: "Could not find it!",!
  • Line Location: ANMC+6
Function Call: WRITE
  • Prompt: "Error in FILE^DIE: ",!
  • Line Location: ANMC+11
Function Call: WRITE
  • Prompt: "Done",!
  • Line Location: ANMC+12
Function Call: WRITE
  • Prompt: "Finding the menu in ABSP PROTOCOL 1...",!
  • Line Location: ANMC+18
Function Call: WRITE
  • Prompt: "Could not find it!",!
  • Line Location: ANMC+21
Function Call: WRITE
  • Prompt: "Finding the ABSP P1 RECEIPT among the ITEMs therein...",!
  • Line Location: ANMC+23
Function Call: WRITE
  • Prompt: "Could not find it!",!
  • Line Location: ANMC+25
Function Call: WRITE
  • Prompt: "Error in FILE^DIE: ",!
  • Line Location: ANMC+29
Function Call: WRITE
  • Prompt: "Done",!
  • Line Location: ANMC+30
Function Call: WRITE
  • Prompt: !,"ILC A/R detected!",!
  • Line Location: BILLMENU+3
Function Call: WRITE
  • Prompt: !,"As a result, we now make a change to the correct billing menu.",!
  • Line Location: BILLMENU+4
Function Call: WRITE
  • Prompt: !!?10,"Couldn't find ABSPMENU in file 19??",!
  • Line Location: BILLMENU+6
Function Call: WRITE
  • Prompt: !!?10,"Couldn't find ABSP BILLING MENU in ABSPMENU??",!
  • Line Location: BILLMENU+9
Function Call: WRITE
  • Prompt: !!?10,"Failed to change the BILLING MENU item",!
  • Line Location: BILLMENU+14
Routine Call
  • DIE
  • Line Location:
    • INIT58+4
Routine Call
  • DIC
  • Line Location:
    • ANMC+5
    • ANMC+20
    • ANMC+24
    • BILLMENU+5
    • BILLMENU+8
Routine Call
  • DIE
  • Line Location:
    • ANMC+9
    • ANMC+27
    • BILLMENU+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101 - [#101] FIND1^DIC
101.01 FIND1^DIC
^DIC(19 - [#19] FIND1^DIC
19.01 FIND1^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABSBITMS(9002302 HASILCAR+4, HASILCAR+6
^ABSP(9002313.55 - [#9002313.55] T1ADDR+4, T1ADDR+31*, T1
^ABSP(9002313.99 - [#9002313.99] POST+5!
^ABSPECX("S" - [#9002313.58] INIT58+1

Label References

Name Line Occurrences
$$HASILCAR POST+1
$$T1 T1ADDR+2
$$T1NAME T1ADDR+3, T1ADDR+22, T1ADDR+32, T1
ANMC POST+2
BILLMENU POST+1
INIT58 POST+3
T1ADDR POST+4
T1VALUES T1ADDR+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%Y HASILCAR+6~
BILLMENU BILLMENU+7~, BILLMENU+8*, BILLMENU+9, BILLMENU+10
DT HASILCAR+8
DUZ(2 POST+2
FDA ANMC+8~, ANMC+26!, BILLMENU+10~, INIT58+2~
FDA( ANMC+26*, BILLMENU+10*, INIT58+3*
FDA(101 ANMC+8*
MAINMENU BILLMENU+5~*, BILLMENU+6, BILLMENU+8, BILLMENU+10
MSG ANMC+8~, ANMC+10, ANMC+11, ANMC+26!, ANMC+28, ANMC+29, BILLMENU+10~, BILLMENU+12, BILLMENU+13, INIT58+2~
, INIT58+5
PCN HASILCAR+4~*, HASILCAR+5, HASILCAR+6
PRO ANMC+5~*, ANMC+6, ANMC+7*, ANMC+8, ANMC+20*, ANMC+21, ANMC+22*, ANMC+24, ANMC+26
PRO1 ANMC+19~, ANMC+24*, ANMC+25, ANMC+26
T1 T1ADDR+2~*, T1ADDR+4, T1ADDR+31
U T1ADDR+23, T1ADDR+24, T1ADDR+25, T1ADDR+26, T1ADDR+27, T1ADDR+28, T1ADDR+29, T1ADDR+30, HASILCAR+4, HASILCAR+6
, INIT58+1
X T1ADDR+4~*, T1ADDR+21, T1ADDR+23, T1ADDR+24, T1ADDR+25*, T1ADDR+26, T1ADDR+27*, T1ADDR+28, T1ADDR+30*, T1ADDR+31
, HASILCAR+6~, HASILCAR+9
X1 HASILCAR+6~, HASILCAR+8*
X2 HASILCAR+6~*, HASILCAR+7
Y T1ADDR+20~*, T1ADDR+21, T1ADDR+23, T1ADDR+24, T1ADDR+25, T1ADDR+26, T1ADDR+27, T1ADDR+29, T1ADDR+30

Marked Items

Name Field # of Occurrence
$T(T1VALUES T1ADDR+20
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All