Routine: ABMDF25X

Information

ABMDF25X ; IHS/ASDST/DMJ - ADA-99 FORM ;

Source file <ABMDF25X.m>

Package	Total	Call Graph
Third Party Billing	1	$$EN^ABMVDF

Package	Total	Caller Graph
Third Party Billing	1	ABMDF25

Name	Comments	DBIA/ICR reference
TEXT	;;TABS;;FIELD LENGTH ; FORMAT ($-$ FORMAT,L-LNGTH REQ'D,C-CENTER,R-RIGHT,D-DATE)
59	;;43;;30
60	;;2^13^26^43;;12^12^12^30
61	;;9^46^68;;14^12^10
27	;;2^10^14^18^30^36^43^71;;10D^2^2^8^6^5^29^8$
20	;;43;;30
21	;;2;;30
22	;;2;;30
23	;;1^41^56^59^63;;30^10D^1^1^16
46	;;2^28^42^51^67;;24^10D^1^1^10D
44	;;42^50^55^58^68^73^78;;1^1^1^1^1^1^1
41	;;2;;79
3	;;2;;1
2	;;2;;1
5	;;2;;30
7	;;43;;30
6	;;43;;30
9	;;2;;30
8	;;2^43;;30^30
39	;;71;;9$
38	;;71;;9$
XIT	;
LOOP2	;
11	;;41^56^59^65;;10D^1^1^15
10	;;2;;30
13	;;16^26^41^57;;1^1^12^20
MARG	;Set left and top margins
15	;;2;;30
48	;;43^51^54^69;;3^1^1^10D
17	;;2^15^18^23;;10D^1^1^10
16	;;42^47^53^62^70^75;;1^1^1^1^1^1
19	;;2^15^20^26^33^43;;10^1^1^1^1^30
18	;;43;;30
57	;;2^47^68;;30^12^12
56	;;2;;30
51	;;56^77;;10D^2
50	;;2^28^42^57^67;;27^10D^1^1^1
55	;;2^41^69;;30^27^10D
FRMT	;
TEST	;
LOOP	;

Name	Line Occurrences
Function Call: WRITE	Prompt: $$EN^ABMVDF("IOF") Line Location: MARG+3
Function Call: WRITE	Prompt: ! Line Location: MARG+4
Function Call: WRITE	Prompt: ! Line Location: LOOP+14
Function Call: WRITE	Prompt: $E(ABM("FLD"),1,ABM("LTH")) Line Location: FRMT+30

Name	Field # of Occurrence
ABM	TEST+2*, XIT+1!
ABM("BLNK"	FRMT+26, FRMT+27, FRMT+28
ABM("FL"	LOOP+5, LOOP+6, LOOP+7*
ABM("FLD"	LOOP+20, LOOP+21, LOOP+22, LOOP2+4, LOOP2+5, FRMT+7, FRMT+11, FRMT+15, FRMT+16, FRMT+20* , FRMT+24, FRMT+28*, FRMT+30
ABM("FMAT"	LOOP+11*, LOOP+18, LOOP+21, FRMT+2
ABM("I"	MARG+4, LOOP+18, LOOP+19, LOOP+21, LOOP+23, LOOP2+2*, LOOP2+3, LOOP2+4, LOOP2+6, FRMT+2
ABM("LM"	MARG+1, MARG+2, LOOP+23, LOOP2+6
ABM("LN"	MARG+1, LOOP+2, LOOP+5, LOOP+6, LOOP+7, LOOP+14, LOOP2+2, LOOP2+4
ABM("LTH"	FRMT+2, FRMT+3, FRMT+5, FRMT+6, FRMT+7, FRMT+9, FRMT+10, FRMT+13, FRMT+14, FRMT+15 , FRMT+18, FRMT+19, FRMT+20, FRMT+22, FRMT+23*, FRMT+24, FRMT+30
ABM("MORE"	XIT+1, XIT+2!
ABM("RT"	FRMT+24*, FRMT+25, FRMT+27
ABM("TABS"	LOOP+10*, LOOP+19, LOOP+23, LOOP2+3, LOOP2+6
ABM("TM"	MARG+1, MARG+2, MARG+4, LOOP+14
ABMF	XIT+1!
ABMF(	LOOP+2, LOOP2+2, LOOP2+4, TEST+2*
ABMF("TEST"	LOOP+17, TEST+1*, TEST+2
U	MARG+1*, MARG+2, LOOP+18, LOOP+19, LOOP+21, LOOP+23, LOOP2+2, LOOP2+3, LOOP2+4, LOOP2+6 , FRMT+2