Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABMDF14X

Package: Third Party Billing

Routine: ABMDF14X


Information

ABMDF14X ; IHS/ASDST/DMJ - New HCFA-1500 Format ;

Source Information

Source file <ABMDF14X.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Third Party Billing 2 BADDR^ABMDLBL1  $$EN^ABMVDF  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Third Party Billing 1 ABMDF14  

Entry Points

Name Comments DBIA/ICR reference
TEXT ;;TABS;;FIELD LENGTH
; FORMAT ($-$ FORMAT,L-LNGTH REQ'D,C-CENTER,R-RIGHT,D-DATE)
OVER ;GET OVRRIDE VALUES FROM 3P INSURER FILE
50 ;;65;;14
25 ;;2^37^54^68;;10D^10D^10D^10D
27 ;;1^28^54^68;;26^21C^10D^10D
23 ;;6^37^56;;24C^10D^23
29 ;;1^52^57^62;;48^1^1^8$
1 ;;1^8^15^24^31^39^45^50;;1^1^1^1^1^1^1^29C
3 ;;1^31^42^47^50;;28^10D^1^1^29C
5 ;;1^33^38^42^47^50;;28^1^1^1^1^29C
7 ;;1^27^35^41^47^50^75;;24^2^1^1^1^23C^2
9 ;;1^14^35^41^47^50^64;;12^14^1^1^1^12C^14
XIT
LOOP2 ;Loop thru the pieces of the line array
11 ;;1^50;;28^29C
51 ;;23^50;;26^29
13 ;;1^35^41^54^68^75;;28^1^1^10D^1^1
MARG ;Set left and top margins
15 ;;2^18^24^35^41^46^50;;10D^1^1^1^1^2^29C
17 ;;1^35^41^50;;28C^1^1^29C
19 ;;1^30^52^57;;28C^19C^1^1
54 ;;12^23^49^67;;10D^26^13R^13C
31 ;;3^30^50;;25^19^29
49 ;;1^17^19^23^38^43^50^61^71;;15^1^1^14C^1^1^10$^9$^8$
37 ;;1^10^19^22^25^42^50^59^62^65^68^70;;8Y^8Y^2R^2R^16^7C^8$^3R^2R^2R^2R^10
36 ;;25^71;;16^9
53 ;;1^23^50;;21^26^29
52 ;;1^23^50;;21^26^29
33 ;;3^30^50;;25^19^29C
FRMT
TEST
LOOP ;Loop thru line number array

External References

Name Field # of Occurrence
BADDR^ABMDLBL1 LOOP+36
$$EN^ABMVDF MARG+3

Interaction Calls

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+28
Function Call: WRITE
  • Prompt: ?1,"XXX",?76,"XXX"
  • Line Location: LOOP+31
Function Call: WRITE
  • Prompt: ?($P(ABM("TABS"),U,ABM("I"))+ABM("LM"))
  • Line Location: LOOP+43
Function Call: WRITE
  • Prompt: ?($P(ABM("TABS"),U,ABM("I"))+ABM("LM"))
  • Line Location: LOOP2+10
Function Call: WRITE
  • Prompt: ?52,"(CONT.)"
  • Line Location: LOOP2+12
Function Call: WRITE
  • Prompt: $E(ABM("FLD"),4,5),$E(ABM("FLD"),6,7),$E(ABM("FLD"),1,3)+1700
  • Line Location: FRMT+3
Function Call: WRITE
  • Prompt: $E(ABM("FLD"),4,5)," ",$E(ABM("FLD"),6,7)," ",$E(ABM("FLD"),1,3)+1700
  • Line Location: FRMT+4
Function Call: WRITE
  • Prompt: $E(ABM("FLD"),4,7),$E(ABM("FLD"),1,3)+1700
  • Line Location: FRMT+5
Function Call: WRITE
  • Prompt: $E(ABM("FLD"),1,ABM("LTH"))
  • Line Location: FRMT+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( LOOP+35
^ABMDEXP(14 MARG+2
^ABMNINS( OVER+1, OVER+2, OVER+4, OVER+5, OVER+7
^AUTNINS - [#9999999.18] LOOP+34

Label References

Name Line Occurrences
FRMT LOOP+43, LOOP2+10
LOOP LOOP+5, LOOP+44, LOOP2+13
LOOP2 LOOP+42
MARG TEST+2
OVER MARG+5
XIT LOOP+1

Naked Globals

Name Field # of Occurrence
^(0 MARG+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM TEST+1*, XIT!
ABM("ADD" LOOP+38, LOOP+39
ABM("BLNK" FRMT+8*
ABM("FL" LOOP+8*, LOOP+9*, LOOP+10*
ABM("FLD" LOOP+43*, LOOP2+8*, LOOP2+9*, LOOP2+10, FRMT+1, FRMT+3, FRMT+4, FRMT+5, FRMT+6*, FRMT+7*
, FRMT+8*, FRMT+9
ABM("FMAT" LOOP+14*, LOOP+43, FRMT
ABM("I" MARG+4*, LOOP+4*, LOOP+34*, LOOP+35, LOOP+43*, LOOP2+1*, LOOP2+2, LOOP2+3, LOOP2+4, LOOP2+6
, LOOP2+7, LOOP2+8, LOOP2+9, LOOP2+10, LOOP2+12, FRMT
ABM("INS" LOOP+32!, LOOP+35*
ABM("J" LOOP+34*, LOOP+35
ABM("LM" MARG+1*, MARG+2*, LOOP+43, LOOP2+10
ABM("LN" MARG+1*, LOOP+1*, LOOP+4, LOOP+8, LOOP+9, LOOP+10, LOOP+28, LOOP2+1, LOOP2+3, LOOP2+4
, LOOP2+6, LOOP2+7, LOOP2+8, LOOP2+9, LOOP2+12, FRMT+1
ABM("LTH" FRMT*, FRMT+1*, FRMT+3*, FRMT+4*, FRMT+5*, FRMT+6*, FRMT+7*, FRMT+8*, FRMT+9
ABM("LTOT" LOOP2+9, FRMT+1*
ABM("RT" FRMT+8*
ABM("TABS" LOOP+13*, LOOP+43, LOOP2+2, LOOP2+10
ABM("TM" MARG+1*, MARG+2*, MARG+4, LOOP+28, LOOP+29, LOOP+31, LOOP+33, LOOP+39
ABMCHK LOOP+20*, LOOP+21, LOOP+25!
ABMF XIT+1!
ABMF( LOOP+1, LOOP+9, LOOP+10, LOOP+19, LOOP+20, LOOP+23, LOOP+24*, LOOP2+1, LOOP2+4*, LOOP2+7*
, LOOP2+8, TEST+1*, OVER+9, OVER+10, OVER+11*, OVER+13*
ABMF("TEST" LOOP+30, LOOP+42, TEST*, TEST+1
ABMF("TMP" LOOP+22*, LOOP+24, LOOP+25!
ABMF(17 LOOP+17, LOOP2+3, LOOP2+6, FRMT+3
ABMF(37 LOOP+22, LOOP+23*
ABMLOOP LOOP+18*, LOOP+19, LOOP+20, LOOP+21, LOOP+23, LOOP+24, LOOP+25!
ABMOLN OVER+1*, OVER+2, OVER+4, OVER+5, OVER+7, OVER+8, OVER+12, OVER+13, OVER+14!
ABMOPC OVER+2*, OVER+4, OVER+5, OVER+7, OVER+11, OVER+13, OVER+14!
ABMOVTYP OVER+3!, OVER+4*, OVER+5*, OVER+6, OVER+7, OVER+14!
>> ABMP("BDFN" LOOP+34, LOOP+35
>> ABMP("INS" MARG+5, LOOP+32, LOOP+34, OVER+1, OVER+2, OVER+4, OVER+5, OVER+7
>> ABMP("MORE" LOOP2+9
>> ABMP("PTOT" LOOP2+9, LOOP2+12
>> ABMP("VTYP" LOOP+17, OVER+5
>> ABMR("MORE" LOOP2+12, XIT+1
ABMVALUE OVER+7*, OVER+11, OVER+13, OVER+14!
DUZ(2 LOOP+35, OVER+1, OVER+2, OVER+4, OVER+5, OVER+7
I OVER+8~*, OVER+9, OVER+10, OVER+11
>> IOT MARG+2
U MARG+2, LOOP+17, LOOP+20, LOOP+34, LOOP+39, LOOP+43, LOOP2+1, LOOP2+2, LOOP2+3, LOOP2+4
, LOOP2+6, LOOP2+7, LOOP2+8, LOOP2+10, FRMT, FRMT+3

Marked Items

Name Field # of Occurrence
$T(@ABM(1) LOOP+13, LOOP+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All