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

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

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

>>	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

Customize PDF page

Package: Pharmacy Point of Sale

Routine: ABSPOSZ

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

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