Routine: ABMDECLN

Package	Total	Call Graph
VA Fileman	5	C^%DTC ^DIC FILE^DIE EN^DIQ1 ^DIR
Patient Care Component	1	^APCDVDSP
Third Party Billing	1	QUEUE^ABMDVPAT

Entry Points

Name	Comments	DBIA/ICR reference
Q	;KILL OFF VARS
CLEAN(CLM,SECT,DFN)
HELP	;EP
CLEANIT(ABMSUB,ABMALL)	;EP - Clean out old values from ABMSUB node
PAGE	;;2^13

External References

Name	Field # of Occurrence
C^%DTC	ABMDECLN+27
QUEUE^ABMDVPAT	ABMDECLN+96, CLEAN+7
^APCDVDSP	ABMDECLN+52
^DIC	ABMDECLN+19
FILE^DIE	CLEANIT+14
EN^DIQ1	ABMDECLN+59
^DIR	ABMDECLN+34, ABMDECLN+42, ABMDECLN+47, ABMDECLN+78

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ABMDECLN+12
Function Call: WRITE	Prompt: !,"WARNING this option deletes the data from selected pages (subfiles) of the" Line Location: ABMDECLN+13
Function Call: WRITE	Prompt: !,"claim file. Then it looks to see if the data can be rebuilt from PCC." Line Location: ABMDECLN+14
Function Call: WRITE	Prompt: !,"For some pages there is no data in PCC. For some the data may be missing." Line Location: ABMDECLN+15
Function Call: WRITE	Prompt: !,"The data will only be rebuilt if the information exists in PCC.",! Line Location: ABMDECLN+16
Function Call: WRITE	Prompt: !! Line Location: ABMDECLN+64
Function Call: WRITE	Prompt: ! Line Location: ABMDECLN+68
Function Call: WRITE	Prompt: ?40 Line Location: ABMDECLN+69
Function Call: WRITE	Prompt: ! Line Location: ABMDECLN+72
Function Call: WRITE	Prompt: !,"Enter the subfile to clean out for claim # ",ABMCLM,"." Line Location: HELP+1
Function Call: WRITE	Prompt: !,"You may enter a list of subfiles like this: 17,19,23." Line Location: HELP+2
Function Call: WRITE	Prompt: !,"Or a range like this: 23-33, or a combination like this:" Line Location: HELP+3
Function Call: WRITE	Prompt: !,"13,19,23-33. To delete all line items from all mutiples enter" Line Location: HELP+4
Function Call: WRITE	Prompt: !,"13-47" Line Location: HELP+5
Routine Call	DIC Line Location: ABMDECLN+19
Routine Call	DIE Line Location: CLEANIT+14
Routine Call	DIR Line Location: ABMDECLN+34 ABMDECLN+42 ABMDECLN+47 ABMDECLN+78

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ABMDCLM - [#9002274.3]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDCLM - [#9002274.3]	ABMDECLN+28, ABMDECLN+36, ABMDECLN+50, ABMDECLN+92, ABMDECLN+93, ABMDECLN+95, CLEANIT+4, CLEANIT+6, CLEANIT+7, CLEANIT+8 , CLEANIT+18, CLEANIT+19, CLEANIT+20!
^ABMDPARM(	ABMDECLN+23
^AUPNVSIT - [#9000010]	ABMDECLN+94
^AUPNVSIT("ABILL"	ABMDECLN+94*

Label References

Name	Line Occurrences
CLEANIT	ABMDECLN+89, ABMDECLN+90, CLEAN+6
Q	ABMDECLN+79

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABM	ABMDECLN+22!, ABMDECLN+35!, ABMDECLN+89*, Q+1!
ABM(0	ABMDECLN+66, ABMDECLN+67, ABMDECLN+70, ABMDECLN+89, ABMDECLN+90
ABM1	ABMDECLN+87*, ABMDECLN+89, Q+1!
ABM2	ABMDECLN+88*, ABMDECLN+89, Q+1!
ABMALL	CLEANIT~, CLEANIT+2*, CLEANIT+9, CLEANIT+16
>> ABMCHV0	CLEANIT+4
ABMCLM	ABMDECLN+11~, ABMDECLN+21*, ABMDECLN+28, ABMDECLN+36, ABMDECLN+50, ABMDECLN+82, HELP+1
ABMFDA	CLEANIT+1~
ABMFDA(	CLEANIT+13*, CLEANIT+15!
ABMI	ABMDECLN+49, ABMDECLN+50, ABMDECLN+51, ABMDECLN+53!
ABMJ	CLEANIT+1~, CLEANIT+5, CLEANIT+6, CLEANIT+7, CLEANIT+8, CLEANIT+11, CLEANIT+19, CLEANIT+20
>> ABMP("CDFN"	CLEANIT+3
>> ABMP("V0"	CLEANIT+4
>> ABMSRC	CLEANIT+17, CLEANIT+18, CLEANIT+19, CLEANIT+20
ABMSUB	CLEANIT~, CLEANIT+4, CLEANIT+6, CLEANIT+7, CLEANIT+8, CLEANIT+10, CLEANIT+12, CLEANIT+20
ABMVDFN	ABMDECLN+11~, ABMDECLN+93*, ABMDECLN+94
ABMY	ABMDECLN+81, ABMDECLN+83, ABMDECLN+84, ABMDECLN+85, Q+1!
>> APCDVDSP	ABMDECLN+51*
CLM	CLEAN~, CLEAN+5
DA	ABMDECLN+59, ABMDECLN+91, ABMDECLN+92*, ABMDECLN+93, Q+1!, CLEAN+4~, CLEANIT+3
DA(1	ABMDECLN+82, ABMDECLN+92, ABMDECLN+93, ABMDECLN+95, CLEAN+5, CLEANIT+3*, CLEANIT+4, CLEANIT+6, CLEANIT+7, CLEANIT+8 , CLEANIT+11, CLEANIT+18, CLEANIT+19, CLEANIT+20
DFN	CLEAN~, CLEAN+7
DIC	ABMDECLN+17, ABMDECLN+55, Q+1!
DIC(0	ABMDECLN+18*
DIQ	ABMDECLN+57*, Q+1!
DIQ(0	ABMDECLN+58*
DIR	ABMDECLN+53!, ABMDECLN+73!, Q+1!
DIR("?"	ABMDECLN+76*
DIR("??"	ABMDECLN+77*
DIR("A"	ABMDECLN+32, ABMDECLN+40, ABMDECLN+45, ABMDECLN+74
DIR("B"	ABMDECLN+33, ABMDECLN+41, ABMDECLN+46*
DIR(0	ABMDECLN+31, ABMDECLN+39, ABMDECLN+44, ABMDECLN+75
DIROUT	ABMDECLN+22!, ABMDECLN+35!
DIRUT	ABMDECLN+22!, ABMDECLN+35!, ABMDECLN+43, ABMDECLN+79, Q+1!
DR	ABMDECLN+56*, Q+1!
DT	ABMDECLN+25
DTOUT	ABMDECLN+22!, ABMDECLN+35!, Q+1!
DUOUT	ABMDECLN+22!, ABMDECLN+35!, Q+1!
DUZ(2	ABMDECLN+23, ABMDECLN+28, ABMDECLN+36, ABMDECLN+50, ABMDECLN+92, ABMDECLN+93, ABMDECLN+95, CLEANIT+4, CLEANIT+6, CLEANIT+7 , CLEANIT+8, CLEANIT+18, CLEANIT+19, CLEANIT+20
FILE	CLEANIT+1~, CLEANIT+12*, CLEANIT+13, CLEANIT+15
>> I	ABMDECLN+61, ABMDECLN+65, ABMDECLN+66*, ABMDECLN+67, ABMDECLN+70
IENS	CLEANIT+1~, CLEANIT+11*, CLEANIT+13
PG	ABMDECLN+60~
PG(	ABMDECLN+63*, ABMDECLN+70
SECT	CLEAN~, CLEAN+6
U	ABMDECLN+23, ABMDECLN+28, ABMDECLN+63, ABMDECLN+94, CLEANIT+9, CLEANIT+10
>> X	ABMDECLN+28, ABMDECLN+84*, ABMDECLN+86, ABMDECLN+87, ABMDECLN+88, ABMDECLN+90
>> X1	ABMDECLN+25*
>> X2	ABMDECLN+26*
>> Y	ABMDECLN+20, ABMDECLN+21, ABMDECLN+23, ABMDECLN+24, ABMDECLN+26, ABMDECLN+36, ABMDECLN+48, ABMDECLN+62, ABMDECLN+63, ABMDECLN+81 , ABMDECLN+95, ABMDECLN+96, CLEAN+7, CLEANIT+8*, CLEANIT+9, CLEANIT+10

Marked Items

Customize PDF page

Package: Third Party Billing

Routine: ABMDECLN

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items