Routine: ABMDE7

Information

ABMDE7 ; IHS/ASDST/DMJ - Edit Page 7 - Inpatient ;

Source file <ABMDE7.m>

Package	Total	Call Graph
Third Party Billing	5	(DISP,V1)^ABMDE7A ^ABMDE7C ^ABMDE7X (FLDS,SEL)^ABMDEOPT ^ABMDERR
VA Fileman	1	^DIE

Name	Comments	DBIA/ICR reference
OPT
10	;;.72[10] Service Thru Date......: "
13	;;.512[13] Prior Authorization No: "
12	;;.66[12] Non Covered Days.......: "
XIT
14	;;.57[14] Professional Comp Days.: "
17	;;.68T
16	;;.67T
EDIT	; Entry of Claim Identifiers
INP	;EP for Prof Comp Days Input Transform
11	;;.73[11] Covered Days...........: "
1	;;.61T
3	;;.51T;S:$G(X)'=85 Y="@1";.525T;@1
2	;;.62T
5	;;.59T
4	;;.52T
7	;;.64T
6	;;.63T
9	;;.71[9] Service From Date.......: "
8	;;.53T
E2

Name	Line Occurrences (* Changed, ! Killed)
^ABMDCLM - [#9002274.3]	ABMDE7+10, ABMDE7+13, EDIT+7, EDIT+10, INP+1, INP+2, INP+3
^AUPNVSIT("ABILL"	ABMDE7+14*

Name	Field # of Occurrence
ABM	OPT!, EDIT+4*, XIT!
ABM("C5"	EDIT+7, EDIT+10, EDIT+11, EDIT+12, EDIT+13
ABM("C7"	EDIT+7*, EDIT+9
ABM("I"	EDIT+4*
ABME	OPT!, XIT!
ABME("CONT"	OPT+3*!
ABME(0	OPT+3
>> ABMP("CDFN"	ABMDE7+10, ABMDE7+13, EDIT+5, EDIT+7, EDIT+10, INP+1, INP+2, INP+3
>> ABMP("DDL"	OPT+4
>> ABMP("FLAT"	OPT+2, EDIT+1, EDIT+8, EDIT+11*
>> ABMP("FLDS"	EDIT+1*, EDIT+4, EDIT+8, EDIT+12, EDIT+13, E2!
>> ABMP("OPT"	OPT+4*
>> ABMP("PAGE"	OPT+4
>> ABMP("QUIT"	OPT+4*
>> ABMP("VDT"	ABMDE7+14
>> ABMP("VTYP"	ABMDE7+11, OPT+2, EDIT+1, EDIT+8
>> ABMVDFN	ABMDE7+13*, ABMDE7+14
ABMZ	OPT!
ABMZ("NUM"	OPT+2*
>> DA	EDIT+5*
>> DIE	EDIT+5*
>> DIROUT	OPT+5, EDIT+3
DR	EDIT+4, EDIT+5!, EDIT+9, EDIT+12, EDIT+13
>> DTOUT	OPT+5, EDIT+3
>> DUOUT	OPT+5, EDIT+3
DUZ(2	ABMDE7+10, ABMDE7+13, EDIT+7, EDIT+10, INP+1, INP+2, INP+3
U	ABMDE7+10, EDIT+9, EDIT+11, EDIT+12, EDIT+13, INP+2, INP+3
X	INP+2!, INP+3!
>> Y	OPT+4, OPT+6