Routine: ACHSSTL

Information

ACHSSTL ; IHS/ITSC/PMF - CHS FACILITY PARAMETER SET UP; [ 12/06/2002 10:36 AM ]

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Contract Health Management Information System	3	VIDEO^ACHS ^ACHSSTL1 ^ACHSSTL2
IHS VA Utilities	2	$$DIR^XBDIR $$C^XBFUNC
VA Fileman	2	^DIE (IX1,IXALL)^DIK
Kernel	1	$$REPEAT^XLFSTR

Entry Points

Name	Comments	DBIA/ICR reference
INDEX	; Index files just installed.
END	;
STDPAR	;
LIST	;
SIG	;
FI	; Set FI address.
DATA	;

External References

Name	Field # of Occurrence
VIDEO^ACHS	ACHSSTL+3
^ACHSSTL1	ACHSSTL+22
^ACHSSTL2	ACHSSTL+22
^DIE	STDPAR+11, SIG+4
IX1^DIK	INDEX+10
IXALL^DIK	INDEX+3
$$DIR^XBDIR	ACHSSTL+10, ACHSSTL+14, LIST+16, STDPAR+8
$$C^XBFUNC	STDPAR+2, DATA+2, FI+2, INDEX+1, INDEX+3, INDEX+8
$$REPEAT^XLFSTR	ACHSSTL+5, ACHSSTL+9, LIST+2, LIST+15

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,$G(IORVON),!,$$REPEAT^XLFSTR("*",78) Line Location: ACHSSTL+5
Function Call: WRITE	Prompt: !,"",?77,"",! Line Location: ACHSSTL+6
Function Call: WRITE	Prompt: "",?30,"CONTRACT HEALTH SYSTEM",?77,"",! Line Location: ACHSSTL+7
Function Call: WRITE	Prompt: "",?31,"FACILITY PARAMETER SET UP",?77,"",! Line Location: ACHSSTL+8
Function Call: WRITE	Prompt: "",?77,"",!,$$REPEAT^XLFSTR("*",78),$G(IORVOFF),!! Line Location: ACHSSTL+9
Function Call: WRITE	Prompt: !!!!!,"Install Complete!!",!! Line Location: ACHSSTL+27
Function Call: WRITE	Prompt: @IOF Line Location: LIST+1
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("*",78) Line Location: LIST+2
Function Call: WRITE	Prompt: !!,"You should know the following items before installing CHS",! Line Location: LIST+3
Function Call: WRITE	Prompt: !,"Check With The CHS Department For The Information If You Don't Have It ",! Line Location: LIST+4
Function Call: WRITE	Prompt: !,"1. CHS Mailing Address (Street,City,State,Zip)" Line Location: LIST+5
Function Call: WRITE	Prompt: !,"2. The Start Date Of Your Fiscal Year If Not Oct 1 (638 Facilities Only)" Line Location: LIST+6
Function Call: WRITE	Prompt: !,"3. CHS Common Accounting Numbers And The Cost Center(s) For Each" Line Location: LIST+7
Function Call: WRITE	Prompt: !,"4. Values For Allowable Overpayment For Each Document Type" Line Location: LIST+8
Function Call: WRITE	Prompt: !,"5. Normal Amount That Each Document Can Be Issued For" Line Location: LIST+9
Function Call: WRITE	Prompt: !,"6. Absolute Maximum That Document Can Be Issued For" Line Location: LIST+10
Function Call: WRITE	Prompt: !,"7. Name(s) and Title(s) Of Person(s) Who Will Sign Documents" Line Location: LIST+11
Function Call: WRITE	Prompt: !,"8. Name and Address Of Fiscal Intermediary",!," (If Other Than Blue Cross/Blue Shield of New Mexico)" Line Location: LIST+12
Function Call: WRITE	Prompt: !,"9. Current Advice Of Allowance" Line Location: LIST+13
Function Call: WRITE	Prompt: !,"10. List of High Volume Providers That Will Be Participating In That Program",! Line Location: LIST+14
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("*",78),! Line Location: LIST+15
Function Call: WRITE	Prompt: !,$$C^XBFUNC("Installing standard parameters...") Line Location: STDPAR+2
Function Call: WRITE	Prompt: !!,"Enter Name and Title Of Person Signing Documents...",!! Line Location: SIG+2
Function Call: WRITE	Prompt: !,$$C^XBFUNC("Installing 'CHS DATA CONTROL FILE'...") Line Location: DATA+2
Function Call: WRITE	Prompt: !,$$C^XBFUNC("Installing 'FISCAL AGENT' address...") Line Location: FI+2
Function Call: WRITE	Prompt: !,$$C^XBFUNC("Re-indexing all files just installed...") Line Location: INDEX+1
Function Call: WRITE	Prompt: !,$$C^XBFUNC(DIK) Line Location: INDEX+3
Function Call: WRITE	Prompt: !,$$C^XBFUNC(DIK) Line Location: INDEX+8
Routine Call	DIE Line Location: STDPAR+11 SIG+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ACHSF - [#9002080]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHS(4 - [#9002064]	FI+1, FI+3*
^ACHS(9 - [#9002069]	DATA+1, DATA+3, DATA+4, DATA+5, DATA+6, DATA+7, DATA+8, DATA+9, DATA+10, DATA+11 , DATA+12
^ACHSF - [#9002080]	STDPAR+1, STDPAR+4, STDPAR+5, STDPAR+7*, STDPAR+15, SIG+1

Label References

Name	Line Occurrences
DATA	ACHSSTL+23
END	ACHSSTL+11, ACHSSTL+15, ACHSSTL+19, ACHSSTL+24
FI	ACHSSTL+23
INDEX	ACHSSTL+24
LIST	ACHSSTL+19
SIG	ACHSSTL+23
STDPAR	ACHSSTL+21

Naked Globals

Name	Field # of Occurrence
^("C"	DATA+8*
^("RN"	DATA+12*
^(0	DATA+3, DATA+4, DATA+5, DATA+6, DATA+9*
^(1	DATA+7*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACHS	INDEX+3*
ACHS638	ACHSSTL+16*, ACHSSTL+17!, STDPAR+6, END+1!
ACHSC	END+1!
>> ACHSDUZ2	ACHSSTL+4, ACHSSTL+12, STDPAR+1, STDPAR+4, STDPAR+5, STDPAR+7, STDPAR+10, STDPAR+15, SIG+1, SIG+3 , DATA+1, DATA+4, DATA+5, DATA+6, DATA+7, DATA+8, DATA+9, DATA+10, DATA+11, DATA+12 , INDEX+7
ACHSFY	STDPAR+14, STDPAR+15, STDPAR+16*, DATA+5, DATA+6, DATA+7, DATA+8, DATA+9, DATA+10, DATA+11 , END+1!
ACHSI	END+1!
ACHSK	END+1!
ACHSO	END+1!
ACHSSITE	END+1!
ACHSZ	END+1!
DA	STDPAR+10, SIG+3, INDEX+6!, INDEX+7*, END+1!
DIC	END+1!
DIE	STDPAR+10, SIG+3, END+1!
DIK	INDEX+2!, INDEX+3, INDEX+6!, INDEX+7, INDEX+8, END+1!
DIR	END+1!
DR	STDPAR+10, SIG+3, END+1!
DT	STDPAR+14, STDPAR+15
>> DTOUT	ACHSSTL+11, ACHSSTL+15
>> DUOUT	ACHSSTL+11, ACHSSTL+15
IOF	ACHSSTL+5, LIST+1
>> IORVOFF	ACHSSTL+9
>> IORVON	ACHSSTL+5
>> STOP	ACHSSTL+19, LIST+16*
U	STDPAR+7, STDPAR+15
>> Y	ACHSSTL+10, ACHSSTL+11, ACHSSTL+12, ACHSSTL+14, ACHSSTL+15, ACHSSTL+16, ACHSSTL+17, STDPAR+8*, STDPAR+9

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSSTL

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: