Routine: ACHSRP3

Package	Total	Call Graph
Contract Health Management Information System	3	($$PARM,$$TRAN)^ACHS ^ACHSRP31 $$SSV^ACHSTX3
Kernel	1	$$FMTE^XLFDT

Package	Total	Caller Graph
Contract Health Management Information System	3	ACHSRP1 ACHSRP2 ACHSRP3D

Entry Points

Name	Comments	DBIA/ICR reference
TESTPRNT	;EP. (For test print.)
AGESEX	;
CSUPL	;
FROMTO	;
KILLNULS	;EP.
DOS	;
EIN	;
HSPORDNO	;
CSUPLA	;EP.
DTOPTAMT	;
PTYPE	;
CNTCANOB	;
DCR	;
END	;
ORDADRS1	;
ORDADRS2	;
SUCODE	;
DESC	;
NAME	;
FACHRN	;
SSV	;
PONUM	;
COMCODE	;
PROVIDER	;
PATADRS	;
PROADRS1	;
ORDOFF	;
PROADRS2	;

External References

Name	Field # of Occurrence
$$PARM^ACHS	PONUM+4, DCR+2, PTYPE+2
$$TRAN^ACHS	CSUPLA+3
^ACHSRP31	CSUPL+3
$$SSV^ACHSTX3	SSV+2
$$FMTE^XLFDT	CSUPLA+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?ACHSTAB+53,$S($$PARM^ACHS(2,20)="Y":$S(ACHSTYPV=1:323,ACHSTYPV=2:324,1:325),1:""),?ACHSTAB+60+$S(ACHSTYPV=1:2,1:0),"0",ACHSORDN,ACHSSF Line Location: PONUM+4
Function Call: WRITE	Prompt: " (",ACHSDCR,")" Line Location: DCR+2
Function Call: WRITE	Prompt: !!?ACHSTAB+42+T,B(1) Line Location: ORDOFF+1
Function Call: WRITE	Prompt: ! Line Location: FACHRN+1
Function Call: WRITE	Prompt: ! Line Location: NAME+1
Function Call: WRITE	Prompt: ?ACHSTAB+28,X Line Location: SSV+2
Function Call: WRITE	Prompt: ! Line Location: PATADRS+1
Function Call: WRITE	Prompt: !?ACHSTAB Line Location: AGESEX+1
Function Call: WRITE	Prompt: ! Line Location: PROADRS1+1
Function Call: WRITE	Prompt: ! Line Location: PROADRS1+3
Function Call: WRITE	Prompt: ! Line Location: FROMTO+1
Function Call: WRITE	Prompt: ?ACHSTAB+39+T,D(7) Line Location: PTYPE+2
Function Call: WRITE	Prompt: ! Line Location: DESC+1
Function Call: WRITE	Prompt: !?ACHSTAB,"SCC: ",$G(F(8)) Line Location: CNTCANOB+1
Function Call: WRITE	Prompt: ?ACHSTAB+$P("^^^^^42^58^^67",U,I)+T,$G(F(I)) Line Location: CNTCANOB+3
Function Call: WRITE	Prompt: !!!?ACHSTAB,ACHSSIG Line Location: CNTCANOB+4
Function Call: WRITE	Prompt: ?ACHSTAB+$P(T,U,I-6),E(I) Condition for execution: $D(E(I)) Line Location: DTOPTAMT+1
Function Call: WRITE	Prompt: ?ACHSTAB+54,ACHSESDA Line Location: DTOPTAMT+1
Function Call: WRITE	Prompt: !!!!!!!!!!! Line Location: HSPORDNO+2
Function Call: WRITE	Prompt: ?20,"PLEASE MAIL IHS-",$S(ACHSTYPV=1:"43",ACHSTYPV=3:"64",1:"")," AND COMPLETED HCFA-",$S(ACHSTYPV=1:"1450",ACHSTYPV=3:"1500",1:"")," TO:",!!?25,$P(^ACHS(4,I,0),U) Line Location: HSPORDNO+5
Function Call: WRITE	Prompt: !?25,$P(^(0),U,6) Condition for execution: $P(^(0),U,6)]"" Line Location: HSPORDNO+5
Function Call: WRITE	Prompt: !?25,$P(^ACHS(4,I,0),U,2),!?25,$P(^(0),U,3) Line Location: HSPORDNO+6
Function Call: WRITE	Prompt: ", ",$P(^DIC(5,$P(^ACHS(4,I,0),U,4),0),U,2)," ",$P(^ACHS(4,I,0),U,5) Line Location: HSPORDNO+7
Function Call: WRITE	Prompt: @IOF Line Location: END+1
Function Call: WRITE	Prompt: !! Line Location: CSUPLA+2
Function Call: WRITE	Prompt: ?25,ACHSTYPE,! Line Location: CSUPLA+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHS(4 - [#9002064]	HSPORDNO+3, HSPORDNO+4, HSPORDNO+5, HSPORDNO+6, HSPORDNO+7
^ACHSF - [#9002080]	ACHSRP3+3, ACHSRP3+7, DESC+3
^DIC(5 - [#5]	HSPORDNO+7

Label References

Name	Line Occurrences
CSUPL	HSPORDNO+4
CSUPLA	CSUPL+1
END	CSUPL+1, CSUPL+2

Naked Globals

Name	Field # of Occurrence
^(0	ACHSRP3+3, HSPORDNO+5, HSPORDNO+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A(1	FACHRN+2
>> A(2	NAME+2
>> A(3	PATADRS+2
>> A(4	AGESEX+2
>> A(5	COMCODE+1
>> A(6	DOS+1
>> A(7	DESC+2
>> A(9	CSUPL+2
>> ACHS	KILLNULS+1*
>> ACHSARCO	DESC+3*, DESC+4
>> ACHSCOPT	ACHSRP3+3
>> ACHSDCR	DCR+2
>> ACHSDEST	HSPORDNO+4
>> ACHSDIEN	ACHSRP3+3, ACHSRP3+7
>> ACHSESDA	DTOPTAMT+1
>> ACHSLCA	ACHSRP3+3*, ACHSRP3+6
>> ACHSORDN	PONUM+4
>> ACHSSF	ACHSRP3+3, ACHSRP3+5, ACHSRP3+6*, PONUM+4
>> ACHSSIG	CNTCANOB+4
>> ACHSTAB	PONUM+4, ORDOFF+1, FACHRN+2, ORDADRS1+1, NAME+2, SSV+2, ORDADRS2+1, PATADRS+2, AGESEX+1, PROVIDER+1 , PROADRS1+2, DOS+1, PROADRS2+1, FROMTO+2, PTYPE+2, EIN+1, DESC+2, CNTCANOB+1, CNTCANOB+3, CNTCANOB+4 , DTOPTAMT+1, HSPORDNO+1
>> ACHSTIEN	ACHSRP3+3, ACHSRP3+7
>> ACHSTPRT	CSUPL+2
>> ACHSTYPE	ACHSRP3+3, ACHSRP3+7, CSUPL+1, CSUPLA+1, CSUPLA+3*
>> ACHSTYPV	PONUM+4, CNTCANOB+5, DTOPTAMT+1, HSPORDNO+5
ACHSX	KILLNULS+1*, KILLNULS+2!
ACHSY	KILLNULS+1*, KILLNULS+2!
>> B(1	ORDOFF+1
>> B(2	ORDADRS1+1
>> B(3	ORDADRS2+1
>> B(4	SUCODE+1
>> C(4	FROMTO+2
>> D(1	PROVIDER+1
>> D(2	PROADRS1+2
>> D(3	PROADRS2+1
>> D(4	EIN+1
>> D(7	PTYPE+2
>> DFN	SSV+2
DUZ(2	ACHSRP3+3, ACHSRP3+7, DESC+3
>> E(	DTOPTAMT+1
>> E(10	HSPORDNO+1
>> E(11	ACHSRP3+7*, CSUPLA+1
>> E(7	ACHSRP3+7*
>> E(8	ACHSRP3+3*
>> F(	CNTCANOB+3
>> F(6	DESC+4*
>> F(8	CNTCANOB+1
>> I	CNTCANOB+3, DTOPTAMT+1, HSPORDNO+3, HSPORDNO+4, HSPORDNO+5, HSPORDNO+6, HSPORDNO+7, CSUPLA+3
IOF	END+1
>> LS	ACHSRP3+3*, ACHSRP3+5
>> T	ACHSRP3+3, PONUM+1, ORDOFF+1, ORDADRS1+1, ORDADRS2+1, PROVIDER+1, PROADRS1+2, PROADRS2+1, PTYPE+2, EIN+1 , CNTCANOB+2, CNTCANOB+3, CNTCANOB+5, DTOPTAMT+1, HSPORDNO+1
U	ACHSRP3+3, ACHSRP3+7, DESC+3, CNTCANOB+3, DTOPTAMT+1, HSPORDNO+1, HSPORDNO+5, HSPORDNO+6, HSPORDNO+7
>> X	ACHSRP3+7, SSV+2

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSRP3

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: