Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ACHSYPCN

Package: Contract Health Management Information System

Routine: ACHSYPCN


Information

ACHSYPCN ; IHS/ITSC/PMF - ENTER DOCUMENTS (2/8)-(PT,HRN,FAC,EDOS,PRO) ; [ 10/16/2001 8:16 AM ]

Source Information

Source file <ACHSYPCN.m>

Entry Points

Name Comments DBIA/ICR reference
GETFAC ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!!!!!,"Enter Fiscal Year final digit, for example",!,?4,"enter 1997 as 7: "
  • Line Location: ACHSYPCN+26
Function Call: WRITE
  • Prompt: " ."
  • Line Location: ACHSYPCN+30
Function Call: WRITE
  • Prompt: !!!,"Total patients = ",COUNT
  • Line Location: ACHSYPCN+39
Function Call: WRITE
  • Prompt: !!!!,"Enter Facility number: "
  • Line Location: GETFAC+1
Function Call: WRITE
  • Prompt: !
  • Line Location: GETFAC+5
Function Call: WRITE
  • Prompt: !,?4,FAC
  • Line Location: GETFAC+5
Function Call: WRITE
  • Prompt: !
  • Line Location: GETFAC+6
Function Call: WRITE
  • Prompt: " Invalid entry"
  • Line Location: GETFAC+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHSF - [#9002080] ACHSYPCN+29, ACHSYPCN+31
^ACHSF("B" GETFAC+5, GETFAC+8
^TEMP("ACHSYPCN" ACHSYPCN+23!, ACHSYPCN+34, ACHSYPCN+36*, ACHSYPCN+40!

Label References

Name Line Occurrences
GETFAC ACHSYPCN+24, GETFAC+4, GETFAC+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> COUNT ACHSYPCN+29*, ACHSYPCN+35*, ACHSYPCN+39
>> DOC ACHSYPCN+29*, ACHSYPCN+31
>> FAC ACHSYPCN+29, ACHSYPCN+31, GETFAC+5*, GETFAC+9*
>> FY ACHSYPCN+26*, ACHSYPCN+27, ACHSYPCN+32
>> OK ACHSYPCN+24*, GETFAC+9*
>> R GETFAC+2*, GETFAC+3, GETFAC+4, GETFAC+8, GETFAC+9
>> X ACHSYPCN+31*
>> XI ACHSYPCN+29*, ACHSYPCN+30
>> Y ACHSYPCN+31*, ACHSYPCN+33, ACHSYPCN+34, ACHSYPCN+36
>> Y2 ACHSYPCN+31*, ACHSYPCN+32
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All