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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABMPPAD2

Package: Third Party Billing

Routine: ABMPPAD2


Information

ABMPPAD2 ; IHS/SD/SDR - Prior Payments/Adjustments page (CE);

Source Information

Source file <ABMPPAD2.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Third Party Billing 6 (PAUSE,SUM)^ABMDE1  ^ABMDEHLP  $$UPC^ABMERUTL  SETVAR^ABMPPAD1  XIT^ABMPPADJ  $$EN^ABMVDF  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
DISP ;EP
A ;; Add - Add a New Entry;;Add
DOLAMT(AMT) ;
E ;; Edit - Edit Information in the Current Screen;;Edit
EJ
ADJS ;EP
FLDS ;EP for Field Edit Controller
Q ;; Quit - Stop Editing the Data;;Quit
S ;; Save - Save transactions;;Save
R ;; Rstr - Restore transactions from A/R;;Restore
XIT
SEL ;EP for Page Commands, Desired Action Controller

External References

Name Field # of Occurrence
PAUSE^ABMDE1 DISP+8
SUM^ABMDE1 DISP+7
^ABMDEHLP SEL+18
$$UPC^ABMERUTL SEL+17
SETVAR^ABMPPAD1 DISP+2
XIT^ABMPPADJ DISP+96, DISP+97
$$EN^ABMVDF DISP+64
^DIR SEL+14, FLDS+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Payment Amount....: "
  • Line Location: DISP+42
Function Call: WRITE
  • Prompt: $$DOLAMT(ABMPM("PD"))
  • Line Location: DISP+42
Function Call: WRITE
  • Prompt: ?40,"Deductible Amount.: ",$$DOLAMT(ABMPM("DED"))
  • Line Location: DISP+43
Function Call: WRITE
  • Prompt: !,"Payment Credits...: ",$$DOLAMT(ABMPM("PCR"))
  • Line Location: DISP+44
Function Call: WRITE
  • Prompt: ?40,"Co-pay/ins Amount.: ",$$DOLAMT(ABMPM("COI"))
  • Line Location: DISP+45
Function Call: WRITE
  • Prompt: !?40,"Write Off.........: ",$$DOLAMT(ABMPM("WO"))
  • Line Location: DISP+46
Function Call: WRITE
  • Prompt: !,"Refund............: ",$$DOLAMT(ABMPM("REF"))
  • Line Location: DISP+47
Function Call: WRITE
  • Prompt: ?40,"Non-Covered Amount: ",$$DOLAMT(ABMPM("NONC"))
  • Line Location: DISP+48
Function Call: WRITE
  • Prompt: !?40,"Penalty Amount....: ",$$DOLAMT(ABMPM("PENS"))
  • Line Location: DISP+49
Function Call: WRITE
  • Prompt: !?40,"Grouper Allowance.: ",$$DOLAMT(ABMPM("GRP"))
  • Line Location: DISP+50
Function Call: WRITE
  • Prompt: ", ",$P($G(^AUTTPIC(ABMCOV,0)),U)
  • Line Location: DISP+70
Function Call: WRITE
  • Prompt: !?14,"COVERAGE TYPE: ",$P($G(^AUTTPIC(ABMCOV,0)),U)
  • Line Location: DISP+71
Function Call: WRITE
  • Prompt: !?6,"PYMT: ",ABMDAMT
  • Line Location: DISP+82
Function Call: WRITE
  • Prompt: !,ABMDASH,!
  • Line Location: DISP+84
Function Call: WRITE
  • Prompt: "ERROR: STANDARD ADJUSTMENT CODE NOT ENTERED FOR ADJUSTMENT",!
  • Line Location: DISP+86
Function Call: WRITE
  • Prompt: "ERROR: STANDARD ADJUSTMENT REASON DOESN'T MATCH ADJUSTMENT CATEGORY/REASON",!
  • Line Location: DISP+87
Function Call: WRITE
  • Prompt: "ERROR: NEGATIVE BALANCE ON BILL NOT ALLOWED",!
  • Line Location: DISP+88
Function Call: WRITE
  • Prompt: ABMDASH,!
  • Line Location: DISP+89
Function Call: WRITE
  • Prompt: "**Use the EDIT option to populate the Standard Adjustment Reason Code**",!
  • Line Location: DISP+90
Function Call: WRITE
  • Prompt: !?7,"ADJ: ",ABMDAMT
  • Line Location: ADJS+1
Function Call: WRITE
  • Prompt: ?24,"<B>"
  • Line Location: ADJS+3
Function Call: WRITE
  • Prompt: ?24,"<N>"
  • Line Location: ADJS+4
Function Call: WRITE
  • Prompt: ?28,"[",$P(ABMPREC,U,2),"] ",$E($P($G(^BAR(90052.01,$P(ABMPREC,U,2),0)),U),1,18)
  • Line Location: ADJS+5
Function Call: WRITE
  • Prompt: ?47,"[",$P(ABMPREC,U,3),"] ",$E($P($G(^BARTBL($P(ABMPREC,U,3),0)),U),1,18)
  • Line Location: ADJS+6
Function Call: WRITE
  • Prompt: *7
  • Line Location: SEL+23
Function Call: WRITE
  • Prompt: !
  • Line Location: FLDS+2
Routine Call
  • DIR
  • Line Location:
    • SEL+14
    • FLDS+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDCLM - [#9002274.3] DISP+11, DISP+12, DISP+13, DISP+14, DISP+66, DISP+69
^AUTNINS - [#9999999.18] DISP+61, DISP+67
^AUTTPIC - [#9999999.65] DISP+68, DISP+70, DISP+71
^BAR(90052.01 - [#90052.01] ADJS+5
^BARADJ - [#90056.06] ADJS+8, ADJS+9, ADJS+10
^BARTBL - [#90052.02] ADJS+6

Label References

Name Line Occurrences
$$DOLAMT DISP+42, DISP+43, DISP+44, DISP+45, DISP+46, DISP+47, DISP+48, DISP+49, DISP+50, DISP+80
@( DISP+98
ADJS DISP+83
DISP DISP+99
EJ FLDS+1
SEL DISP+95, SEL+18, SEL+23
XIT DISP+8, SEL+1, SEL+15, SEL+21, SEL+22, FLDS+3, EJ+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%P SEL+3!
>> ABM("DO" DISP+98*
>> ABMAAMT DISP+32*, DISP+33, DISP+34, DISP+35, DISP+36, DISP+37, DISP+38, DISP+39, DISP+40
>> ABMATYP DISP+31*, DISP+33, DISP+34, DISP+35, DISP+36, DISP+37, DISP+38, DISP+39, DISP+40
>> ABMC("CONT" DISP+8*
>> ABMCAT DISP+23*, DISP+24*, DISP+26, DISP+27, DISP+29, DISP+30, DISP+72*, DISP+73*, DISP+75, DISP+76
, DISP+78, DISP+79, DISP+82, ADJS+2
>> ABMCOV DISP+65*, DISP+66*, DISP+68, DISP+69*, DISP+70, DISP+71
>> ABMDAMT DISP+78*, DISP+80*, DISP+82, ADJS+1
>> ABMDASH DISP+3*, DISP+84, DISP+89
ABMEFLG DISP+1!
>> ABMIIEN DISP+12*, DISP+16, DISP+21*, DISP+22*, DISP+24, DISP+26, DISP+27, DISP+55*, DISP+57*, DISP+58
, DISP+59, DISP+61, DISP+67, DISP+73, DISP+75, DISP+76, DISP+78, ADJS+2
>> ABMINS DISP+10*, DISP+11*, DISP+12, DISP+13, DISP+14, DISP+16, DISP+59*, DISP+66, DISP+69
>> ABMIPRI DISP+19*, DISP+20*, DISP+22
>> ABMLN DISP+25*, DISP+26*, DISP+27, DISP+74*, DISP+75*, DISP+76, DISP+77, DISP+78, ADJS+2
>> ABMLNSV DISP+77*
>> ABMLST("PRIO" DISP+16*, DISP+20, DISP+22, DISP+54, DISP+57, DISP+58, DISP+59
>> ABMLST("TRANS" DISP+24, DISP+26, DISP+27, DISP+73, DISP+75, DISP+76, DISP+78, ADJS+2
ABMMFLG DISP+1!, DISP+87, DISP+89, DISP+91!, ADJS+9*, ADJS+10*
ABMNFLG DISP+42*!, DISP+79*, DISP+81!, DOLAMT+1
ABMO XIT!
ABMO("CTR" SEL+8*, SEL+10, SEL+11
ABMO("DFLT" SEL+4*, SEL+16
ABMO("TXT" SEL+8*, SEL+9
ABMO("Y" FLDS+1*
>> ABMP("CBAMT" DISP+18*, DISP+28*, DISP+88
>> ABMP("CDFN" DISP+11, DISP+12, DISP+13, DISP+14, DISP+66, DISP+69
>> ABMP("DDL" DISP+7, SEL+1
>> ABMP("DFLT" DISP+94*, SEL+2*, SEL+4, SEL+21!, SEL+22!
>> ABMP("EXP" DISP+85
>> ABMP("FLDS" FLDS+1, FLDS+2, EJ*
>> ABMP("OPT" DISP+93*, SEL+4, SEL+8, SEL+21, XIT!
>> ABMP("QUIT" SEL+1
>> ABMP("SCRN" DISP+5*
>> ABMP("VIEWMODE" SEL+9
>> ABMPM("COI" DISP+36*, DISP+45
>> ABMPM("DED" DISP+35*, DISP+43
>> ABMPM("GRP" DISP+38*, DISP+50
>> ABMPM("NONC" DISP+34*, DISP+48
>> ABMPM("PCR" DISP+40*, DISP+44
>> ABMPM("PD" DISP+29*, DISP+42
>> ABMPM("PENS" DISP+37*, DISP+49
>> ABMPM("REF" DISP+39*, DISP+47
>> ABMPM("WO" DISP+33*, DISP+46
>> ABMPREC ADJS+2*, ADJS+5, ADJS+6, ADJS+7, ADJS+8, ADJS+9, ADJS+10, ADJS+11
>> ABMPRI DISP+13*, DISP+16, DISP+53*, DISP+54*, DISP+56, DISP+57, DISP+58, DISP+59, DISP+61, DISP+62
>> ABMPRIS DISP+56*
ABMRSTR DISP+1!
>> ABMRVFLG DISP+51*
ABMSFLG DISP+1!, DISP+86, DISP+88*, DISP+89, DISP+90, DISP+91!, ADJS+11*
>> ABMSTAT DISP+14*, DISP+15, DISP+16, DISP+58*, DISP+60*, DISP+64
>> ABMTREC DISP+27*, DISP+28, DISP+29, DISP+31, DISP+32
>> ABMZ("NUM" SEL+22
>> ABMZ("PG" DISP+6*
>> ABMZ("TITL" DISP+4*
AMT DOLAMT~, DOLAMT+1
DIR SEL+3!, SEL+14!, FLDS+2!
DIR("?" SEL+6*, SEL+7*, SEL+10*, SEL+11*, SEL+12*
DIR("A" SEL+5*, SEL+10*, SEL+13*, FLDS+2*
DIR("B" SEL+4*, FLDS+2*
DIR(0 SEL+3*, FLDS+2*
>> DIROUT DISP+8, DISP+97, SEL+15, FLDS+3
>> DTOUT DISP+8, DISP+97, SEL+15, FLDS+3
>> DUOUT DISP+8, DISP+97, SEL+15, FLDS+3
DUZ(2 DISP+11, DISP+12, DISP+13, DISP+14, DISP+66, DISP+69
U DISP+12, DISP+13, DISP+14, DISP+28, DISP+29, DISP+31, DISP+32, DISP+58, DISP+59, DISP+61
, DISP+67, DISP+68, DISP+70, DISP+71, DISP+76, DISP+78, ADJS+5, ADJS+6, ADJS+7, ADJS+8
, ADJS+9, ADJS+10, ADJS+11
>> X SEL+16, SEL+18
>> Y DISP+96, DISP+98, SEL+1*, SEL+16*, SEL+17*, SEL+19*, SEL+20*, SEL+21, SEL+22*, FLDS+1*
, EJ

Marked Items

Name Field # of Occurrence
$T(@ABMO(1) SEL+10
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All