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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ABMDTGAS

Package: Third Party Billing

Routine: ABMDTGAS


Information

ABMDTGAS ; IHS/ASDST/DMJ - Remap Group Names for an Employer ;

Source Information

Source file <ABMDTGAS.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 ^DIC  ^DIR  
Third Party Billing 1 ^ABMDDIE  

Entry Points

Name Comments DBIA/ICR reference
END ;EP
S ;
XIT
SEL
SCAN1 ;EP scan "AE" of policy holder file
SCAN2 ;EP scan the patient file to pick up those policies that have

External References

Name Field # of Occurrence
^ABMDDIE SCAN1+4, SCAN2+5
^DIC SEL, SEL+2
^DIR S+3, SEL+6, END+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This utility allows for the mass assignment of a specified Group Plan to the",!,"policies of each employee for a selected Employer.",!
  • Line Location: S+1
Function Call: WRITE
  • Prompt: !,"NONE SELECTED EXITING OPTION",!,*7
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: *7
  • Line Location: SEL+2
Function Call: WRITE
  • Prompt: !!,"You have selected to assign all employees of: ",ABMEMPNM
  • Line Location: SEL+4
Function Call: WRITE
  • Prompt: !?29," the Group Plan: ",ABMGRPNM
  • Line Location: SEL+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+6
Function Call: WRITE
  • Prompt: "."
  • Line Location: SCAN1+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: SCAN2+4
Function Call: WRITE
  • Prompt: !!,?10,"POLICIES CHANGED: ",ABMC1+ABMC3,!
  • Line Location: SCAN2+7
Function Call: WRITE
  • Prompt: !
  • Line Location: END+1
Routine Call
  • DIC
  • Line Location:
    • SEL
    • SEL+2
Routine Call
  • DIR
  • Line Location:
    • S+3
    • SEL+6
    • END+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPN3PPH - [#9000003.1] Classic Fileman Calls
^AUTNEMPL - [#9999999.75] Classic Fileman Calls
^AUTNEGRP - [#9999999.77] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPN3PPH("AE" SCAN1+2
^AUPN3PPH("C" SCAN2+5
^AUPNPAT("AF" SCAN2+3

Label References

Name Line Occurrences
END SEL+2, SEL+6
SEL END+2
XIT SEL, SEL+6

Naked Globals

Name Field # of Occurrence
^( SCAN2+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ABM("DIE-FAIL" SCAN1+2, SCAN2+3
ABMC1 SCAN1+2*, SCAN1+3, SCAN2+7, XIT!
ABMC2 SCAN2+3*, SCAN2+4, XIT!
ABMC3 SCAN2+2*, SCAN2+5*, SCAN2+7, XIT!
ABMDA SCAN1+1*, SCAN1+2*, SCAN1+4, XIT!
ABMDFN SCAN2+2*, SCAN2+3*, SCAN2+5, XIT!
ABMEMP SEL+1*, SCAN1+2, SCAN2+3, XIT!
ABMEMPNM SEL+1*, SEL+4, XIT!
ABMGRP SEL+3*, SCAN1+1, SCAN2+2, XIT!
ABMGRPNM SEL+3*, SEL+5, XIT!
DA SCAN1+4*, SCAN2+5*, XIT!
DIC SEL!*, SEL+2!*
DIC("A" SEL+2*
DIC(0 SEL*, SEL+2*
>> DIE SCAN1+1*, SCAN2+2*
DIR S+2!, SEL+6!, END+2!
DIR("A" S+2*, SEL+6*, END+2*
DIR(0 S+2*, SEL+6*, END+2*
>> DIROUT SEL+6
>> DIRUT SEL+6
>> DR SCAN1+1*, SCAN2+2*
>> Y S+3, SEL, SEL+1, SEL+2, SEL+3, SEL+6, END+2
>> Y(0 SEL+1, SEL+3
>> ZTQUEUED SCAN1+3, SCAN2+4, SCAN2+7
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All