

GTM>[?1h=S[C [CD[CU[CZ[C=[C1[C [CD[C [C^[CX[CU[CP[C[?1l>

Setting up programmer environment
This is a TEST account.

Terminal Type set to: C-VT220

You have 1701 new messages.
Select OPTION NAME: SDAM APPT MGT       Appointment Management
Appointment Management
Select Patient name or Clinic name: Clinic2

     Searching for a Patient


     Searching for a Clinic
  Clinic2     
        ...OK? Yes// Yes  (Yes)

Select Beginning Date: FEB 23, 2013//  (FEB 23, 2013)
Select    Ending Date: TODAY//   (FEB 25, 2013)
[?25l
[1;1H[1;1H[J[2J[H
[4m
[1m
[1;1HAppt Mgt Module[22m[4m               
[1;31HFeb 25, 2013@12:55:31          Page:    1 of    1 [24m[1;1H
Clinic: Clinic2
No Action Taken/Action Required  * - New GAF Required     02/23/13 thru 02/25/13

[4;1H
[4m
     Patient                   Appt Date/Time        Status                     
[24m

[5;1H
                                                                                
    No appointments meet criteria.                                              





[12;1H

[7m
          Enter ?? for more actions                                             
[27m

[14;1H[J7[14;24r8
[4m
7[1;31HFeb 25, 2013@12:55:318
[24m
[13;1H[12;1H

CI  Check In              CD  Change Date Range     DX  Diagnosis Update
UN  Unscheduled Visit     EP  Expand Entry          DL  Wait List Display
MA  Make Appointment      AE  Add/Edit              DE  Delete Check Out
CA  Cancel Appointment    RT  Record Tracking       WD  Wait List Disposition
NS  No Show               PD  Patient Demographics  CP  Procedure Update
DC  Discharge Clinic      CO  Check Out             PC  PCMM Assign or Unassign
AL  Appointment Lists     EC  Edit Classification   TI  Display Team Information
PT  Change Patient        PR  Provider Update
CL  Change Clinic         WE  Wait List Entry[J
[?25h

Select Action: Quit// MA   Make Appointment  7[1;24r8

Clinic: Clinic2


Select PATIENT NAME: ??
    
   Choose from:
   CARTER,DAVID JR         3-2-01    000000112     NO     NON-VETERAN (OTHER)   
   
   EIGHT,PATIENT H         4-1-33    655447777     YES     SC VETERAN      
   EIGHTEEN,PATIENT R         7-8-69    111257654     YES     SC VETERAN      
   ELEVEN,PATIENT K         5-1-33    354623902     YES     SC VETERAN      
   FIFTEEN,PATIENT O         4-14-45    301444321     YES     SC VETERAN      
   FIVE,PATIENT E         5-1-22    656454321     YES     SC VETERAN      
   FOUR,PATIENT D         4-1-55    666551234     YES     SC VETERAN      
   FOURTEEN,PATIENT N         7-8-56    444678924     YES     SC VETERAN      
   NINE,PATIENT I         1-1-66    323123456     YES     SC VETERAN      
   NINETEEN,PATIENT S         9-10-55    311776543     YES     SC VETERAN      
   ONE,PATIENT A         10-3-59    543236666     YES     SC VETERAN      
   SEVEN,PATIENT G         5-2-45    656771234     YES     SC VETERAN      
   SEVENTEEN,PATIENT Q         6-7-67    212118765     YES     SC VETERAN      
   SIX,PATIENT F         5-1-41    656451234     YES     NSC VETERAN      
   SIXTEEN,PATIENT P         5-6-66    222559876     YES     SC VETERAN      
   TEN,PATIENT J         4-1-33    345238901     YES     NSC VETERAN      
   THIRTEEN,PATIENT M         7-7-54    323678904     YES     SC VETERAN      
   THREE,PATIENT C         3-30-54    333224444     NO     NSC VETERAN      
   '^' TO STOP: ^
               
    
Select PATIENT NAME: 333224444  THREE,PATIENT C        3-30-54    333224444     
NO     NSC VETERAN      

PATIENT'S SERVICE CONNECTION AND RATED DISABILITIES:
Service Connected: No
Primary Eligibility Code: 

'PRIMARY ELIGIBILITY CODE' field is blank please update patient record.
The 'SC Percent','Service Connected' and 'Primary Eligibility Codes' are OUT OF 
SYNC, Please CORRECT the problem.

APPOINTMENT TYPE: REGULAR//Regular    
NO PENDING APPOINTMENTS
Select ETHNICITY: 
Select RACE: 
COUNTRY: UNITED STATES// UNITED STATES  USA     United States
STREET ADDRESS [LINE 1]: 
ZIP+4: 
PHONE NUMBER [RESIDENCE]: 
PHONE NUMBER [WORK]: 
BAD ADDRESS INDICATOR: 
Are you sure that you want to save the above changes? No  NO
Change aborted.
Press ENTER to continue: 

IS THIS A 'NEXT AVAILABLE' APPOINTMENT REQUEST? Yes  YES

Calculating follow-up status
[1;1H[1;1H[J[2J[H[1;1H[1;1H[J
                                    
                                    Feb 2013

 TIME  |8      |9      |10     |11     |12     |1      |2      |3      |4      
 DATE  |       |       |       |       |       |       |       |       |
MO 25  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
TU 26  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
WE 27  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
TH 28  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
                                    Mar 2013
FR 01  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
SA 02  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
SU 03  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
MO 04  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
TU 05  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
WE 06  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
TH 07  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
FR 08  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 
SA 09  [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] [p] 

30 MINUTE APPOINTMENTS 
DATE/TIME: t+5  (MAR 02, 2013)
30 MINUTE APPOINTMENTS 
DATE/TIME: 1PM  (FEB 25, 2013@13:00)

THIS APPOINTMENT IS MARKED AS 'NEXT AVAILABLE', IS THIS CORRECT? YES// Yes  YES

WANT PATIENT NOTIFIED OF LAB,X-RAY, OR EKG STOPS? No// No  (No)
  OTHER INFO: 

AMIE LINK OUT OF ORDER

Press RETURN to continue: 
[?25l
[1;1H[1;1H[J[2J[H
[4m
[1m
[1;1HAppt Mgt Module[22m[4m               
[1;31HFeb 25, 2013@12:55:35          Page:    1 of    1 [24m[1;1H
Clinic: Clinic2
No Action Taken/Action Required  * - New GAF Required     02/23/13 thru 02/25/13

[4;1H
[4m
     Patient                   Appt Date/Time        Status                     
[24m

[5;1H
 1   4444 Three,Patient C      02/25/2013@13:00      No Action Taken/Today      






[12;1H

[7m
          Enter ?? for more actions                                             
[27m

[14;1H[J7[14;24r8
[4m
7[1;31HFeb 25, 2013@12:55:358
[24m
[13;1H[12;1H

CI  Check In              CD  Change Date Range     DX  Diagnosis Update
UN  Unscheduled Visit     EP  Expand Entry          DL  Wait List Display
MA  Make Appointment      AE  Add/Edit              DE  Delete Check Out
CA  Cancel Appointment    RT  Record Tracking       WD  Wait List Disposition
NS  No Show               PD  Patient Demographics  CP  Procedure Update
DC  Discharge Clinic      CO  Check Out             PC  PCMM Assign or Unassign
AL  Appointment Lists     EC  Edit Classification   TI  Display Team Information
PT  Change Patient        PR  Provider Update
CL  Change Clinic         WE  Wait List Entry[J
[?25h

Select Action: Quit// Quit   QUIT  7[1;24r8[m[m[11;1H[1;1H[J[2J[H

GTM>[?1h=S[C [CD[CU[CZ[C=[C1[C [CD[C [C^[CX[CU[CP[C[?1l>

Setting up programmer environment
This is a TEST account.

Terminal Type set to: C-VT220

You have 1701 new messages.
Select OPTION NAME: SDAM APPT MGT       Appointment Management
Appointment Management
Select Patient name or Clinic name: Clinic2

     Searching for a Patient


     Searching for a Clinic
  Clinic2     
        ...OK? Yes// Yes  (Yes)

Select Beginning Date: FEB 23, 2013//  (FEB 23, 2013)
Select    Ending Date: TODAY//   (FEB 25, 2013)
[?25l
[1;1H[1;1H[J[2J[H
[4m
[1m
[1;1HAppt Mgt Module[22m[4m               
[1;31HFeb 25, 2013@12:55:36          Page:    1 of    1 [24m[1;1H
Clinic: Clinic2
No Action Taken/Action Required  * - New GAF Required     02/23/13 thru 02/25/13

[4;1H
[4m
     Patient                   Appt Date/Time        Status                     
[24m

[5;1H
 1   4444 Three,Patient C      02/25/2013@13:00      No Action Taken/Today      






[12;1H

[7m
          Enter ?? for more actions                                             
[27m

[14;1H[J7[14;24r8
[4m
7[1;31HFeb 25, 2013@12:55:368
[24m
[13;1H[12;1H

CI  Check In              CD  Change Date Range     DX  Diagnosis Update
UN  Unscheduled Visit     EP  Expand Entry          DL  Wait List Display
MA  Make Appointment      AE  Add/Edit              DE  Delete Check Out
CA  Cancel Appointment    RT  Record Tracking       WD  Wait List Disposition
NS  No Show               PD  Patient Demographics  CP  Procedure Update
DC  Discharge Clinic      CO  Check Out             PC  PCMM Assign or Unassign
AL  Appointment Lists     EC  Edit Classification   TI  Display Team Information
PT  Change Patient        PR  Provider Update
CL  Change Clinic         WE  Wait List Entry[J
[?25h

Select Action: Quit// AL   Appointment Lists  

Select List: No Action Taken// TA   Total Appt Profile  [3;1H[1;1H[J[2J[H
[4m
[1m
[1;1HAppt Mgt Module[22m[4m               
[1;31HFeb 25, 2013@12:55:36          Page:    1 of    1 [24m[1;1H
Clinic: Clinic2
Total Appointment Profile        * - New GAF Required     02/23/13 thru 02/25/13

[4;1H
[4m
     Patient                   Appt Date/Time        Status                     
[24m

[5;1H
 1   4444 Three,Patient C      02/25/2013@13:00      No Action Taken/Today      






[12;1H

[7m
          Enter ?? for more actions                                             
[27m


[?25l
[14;1H[J7[14;24r8
[4m
7[1;31HFeb 25, 2013@12:55:368
[24m
[13;1H[12;1H

CI  Check In              CD  Change Date Range     DX  Diagnosis Update
UN  Unscheduled Visit     EP  Expand Entry          DL  Wait List Display
MA  Make Appointment      AE  Add/Edit              DE  Delete Check Out
CA  Cancel Appointment    RT  Record Tracking       WD  Wait List Disposition
NS  No Show               PD  Patient Demographics  CP  Procedure Update
DC  Discharge Clinic      CO  Check Out             PC  PCMM Assign or Unassign
AL  Appointment Lists     EC  Edit Classification   TI  Display Team Information
PT  Change Patient        PR  Provider Update
CL  Change Clinic         WE  Wait List Entry[J
[?25h

Select Action: Quit// CI   Check In  
 1   4444 Three,Patient C      02/25/2013@13:00      No Action Taken/Today 7[6;1H
[1m
[6;1H 1   4444 Three,Patient C      02/25/2013@13:00      No Action Taken/Today      
[22m
[6;81H
[m
[6;81H8
CHECKED-IN:  FEB 25, 2013@12:55//   (FEB 25, 2013@12:55)

AMIE LINK OUT OF ORDER

Press RETURN to continue: 
        ...checked in FEB 25, 2013@12:557[6;1H 1   4444 Three,Patient C      02/25/2013@13:00      
[1m
[6;54HAct Req/Checked In   
[22m
[6;75H 
[1m
[6;76H12:55
[22m
[6;81H
[m
[6;81H8
[?25l
[14;1H[J7[14;24r8
[4m
7[1;31HFeb 25, 2013@12:55:368
[24m
[13;1H[12;1H

CI  Check In              CD  Change Date Range     DX  Diagnosis Update
UN  Unscheduled Visit     EP  Expand Entry          DL  Wait List Display
MA  Make Appointment      AE  Add/Edit              DE  Delete Check Out
CA  Cancel Appointment    RT  Record Tracking       WD  Wait List Disposition
NS  No Show               PD  Patient Demographics  CP  Procedure Update
DC  Discharge Clinic      CO  Check Out             PC  PCMM Assign or Unassign
AL  Appointment Lists     EC  Edit Classification   TI  Display Team Information
PT  Change Patient        PR  Provider Update
CL  Change Clinic         WE  Wait List Entry[J
[?25h

Select Action: Quit//    QUIT  7[1;24r8[m[m[11;1H[1;1H[J[2J[H

GTM>[?1h=S[C [CD[CU[CZ[C=[C1[C [CD[C [C^[CX[CU[CP[C[?1l>

Setting up programmer environment
This is a TEST account.

Terminal Type set to: C-VT220

You have 1701 new messages.
Select OPTION NAME: SDAM APPT MGT       Appointment Management
Appointment Management
Select Patient name or Clinic name: Clinic2

     Searching for a Patient


     Searching for a Clinic
  Clinic2     
        ...OK? Yes// Yes  (Yes)

Select Beginning Date: FEB 23, 2013//  (FEB 23, 2013)
Select    Ending Date: TODAY//   (FEB 25, 2013)
[?25l
[1;1H[1;1H[J[2J[H
[4m
[1m
[1;1HAppt Mgt Module[22m[4m               
[1;31HFeb 25, 2013@12:55:37          Page:    1 of    1 [24m[1;1H
Clinic: Clinic2
No Action Taken/Action Required  * - New GAF Required     02/23/13 thru 02/25/13

[4;1H
[4m
     Patient                   Appt Date/Time        Status                     
[24m

[5;1H
 1   4444 Three,Patient C      02/25/2013@13:00      Act Req/Checked In    12:55






[12;1H

[7m
          Enter ?? for more actions                                             
[27m

[14;1H[J7[14;24r8
[4m
7[1;31HFeb 25, 2013@12:55:378
[24m
[13;1H[12;1H

CI  Check In              CD  Change Date Range     DX  Diagnosis Update
UN  Unscheduled Visit     EP  Expand Entry          DL  Wait List Display
MA  Make Appointment      AE  Add/Edit              DE  Delete Check Out
CA  Cancel Appointment    RT  Record Tracking       WD  Wait List Disposition
NS  No Show               PD  Patient Demographics  CP  Procedure Update
DC  Discharge Clinic      CO  Check Out             PC  PCMM Assign or Unassign
AL  Appointment Lists     EC  Edit Classification   TI  Display Team Information
PT  Change Patient        PR  Provider Update
CL  Change Clinic         WE  Wait List Entry[J
[?25h

Select Action: Quit// AL   Appointment Lists  

Select List: No Action Taken// TA   Total Appt Profile  [3;1H[1;1H[J[2J[H
[4m
[1m
[1;1HAppt Mgt Module[22m[4m               
[1;31HFeb 25, 2013@12:55:37          Page:    1 of    1 [24m[1;1H
Clinic: Clinic2
Total Appointment Profile        * - New GAF Required     02/23/13 thru 02/25/13

[4;1H
[4m
     Patient                   Appt Date/Time        Status                     
[24m

[5;1H
 1   4444 Three,Patient C      02/25/2013@13:00      Act Req/Checked In    12:55






[12;1H

[7m
          Enter ?? for more actions                                             
[27m


[?25l
[14;1H[J7[14;24r8
[4m
7[1;31HFeb 25, 2013@12:55:378
[24m
[13;1H[12;1H

CI  Check In              CD  Change Date Range     DX  Diagnosis Update
UN  Unscheduled Visit     EP  Expand Entry          DL  Wait List Display
MA  Make Appointment      AE  Add/Edit              DE  Delete Check Out
CA  Cancel Appointment    RT  Record Tracking       WD  Wait List Disposition
NS  No Show               PD  Patient Demographics  CP  Procedure Update
DC  Discharge Clinic      CO  Check Out             PC  PCMM Assign or Unassign
AL  Appointment Lists     EC  Edit Classification   TI  Display Team Information
PT  Change Patient        PR  Provider Update
CL  Change Clinic         WE  Wait List Entry[J
[?25h

Select Action: Quit// CO   Check Out  7[1;24r8

 1   4444 Three,Patient C      02/25/2013@13:00      Act Req/Checked In    12:55
Do you wish to make a follow-up appointment? YES// No  NO7[1;24r8[24m(B
Check out date and time:  NOW// Now  (FEB 25, 2013@12:55)[15;1H[1;1H[J[2J[H[1m
[APAT/APPT/CLINIC:  THREE,PATIENT C  FEB 25, 2013@13:00               Clinic2[
22m
PROVIDER: ...Select a Provider.....[4m
                                                                            
[24m[4;2H[J[22m[1m
[A               - - E N C O U N T E R  P R O V I D E R S - -[22m[K[4m
No. PROVIDER                      PERSON CLASS ON  FEB 25, 2013@13:00       [J
[24m
                        [1mNo PROVIDERS for this Encounter.[22m[22m[?25l7[
17;24r8[?25h[16;2H[16;2H[24m7[2;11H...There are 0 PROVIDER(S) associated with this encounter.[16;1H
Enter PROVIDER: [KAlexander[D[K[D[K[D[K[D[K[D[K[D[K[D[K[D[K[D
[K[C[C[C[C[C[C[C[C[CALEXANDER,ROBERT[J[B[2K[A
Is this the PRIMARY provider for this ENCOUNTER? YES// Yes  YES[2;11HALEXANDER,ROBERT      PRIMARY[K[4;2H[J[22m[1m
[A               - - E N C O U N T E R  P R O V I D E R S - -[22m[K[4m
No. PROVIDER                      PERSON CLASS ON  FEB 25, 2013@13:00       [J
[24m
1   ALEXANDER,ROBERT*    PRIMARY  Allopathic/Family Practice/Adolescent Medi[22
m[22m[?25l7[17;24r8[?25h[16;2H[16;2H7[3;1H[4mPrevious Entry:   ALEXANDER,ROBERT          8[24m7[2;11H...There is 1 PROVIDER associated with this encounter.[16;1H
Enter PROVIDER: [K[J7[1;24r8[17;1H[1;1H[J[2J[H[1m
[APAT/APPT/CLINIC:  THREE,PATIENT C  FEB 25, 2013@13:00               Clinic2[
22m
ICD CODE: ...Select a DIAGNOSIS Code.....[4m
                                                                            
[24m
[A        [1m- - E N C O U N T E R  D I A G N O S I S  (ICD9 CODES) - -[22m[
K
[A        [1m- - E N C O U N T E R  D I A G N O S I S  (ICD9 CODES) - -[22m[
K[4m
No.  ICD     DESCRIPTION                                        PROBLEM LIST[J
[24m[?25l7[17;24r8[?25h[16;2H[24m7[2;11H...There are 0 ICD CODES associated with this encounter.[16;1H
Enter Diagnosis : [K305.91[?25l7[17;24r8[?25h

  Other, mixed, or unspecified drug abuse, continuous use (ICD-9-CM 305.91)

    Ok?  YES//  Yes

>>>  Code  :  [1m305.91[22m
[J[?25l7[17;24r8[?25h[B[2K[A
ONE primary diagnosis must be established for each encounter!
Is this the PRIMARY DIAGNOSIS for this ENCOUNTER? YES// Yes  YES[B[2K[A

     Select one of the following:

          O         ORDERING
          R         RESULTING
          OR        BOTH O&R

Is this Diagnosis Ordering or Resulting:: // RESULTING7[1;24r8

Patient's Service Connection and Rated Disabilities:

 Service Connected: No
Rated Disabilities: Not a Veteran	 S DGIEN=+$P($Q(^DGMS(29.11,"APDT",DFN,DGDATE,DGIEN),-1),",",5)
	                                                    ^-----
		At column 53, line 45, source module /home/softhat/VistA-Instance/r/DGMSTAPI.m
%GTM-E-RPARENMISSING, Right parenthesis expected
[2;11H305.91 --OTHER DRUG ABUSE-CONTIN      PRIMARY[K[2;1H[1;1H[J[2J[H[1m
[APAT/APPT/CLINIC:  THREE,PATIENT C  FEB 25, 2013@13:00               Clinic2[
22m
ICD CODE: ...Select a DIAGNOSIS Code.....[4m
                                                                            
[24m
[A        [1m- - E N C O U N T E R  D I A G N O S I S  (ICD9 CODES) - -[22m[
K[4;1H[J
[A        [1m- - E N C O U N T E R  D I A G N O S I S  (ICD9 CODES) - -[22m[
K[4m
No.  ICD     DESCRIPTION                                        PROBLEM LIST[J
[24m
1    305.91  OTHER DRUG ABUSE-CONTIN        [1mPRIMARY[22mRESULTING  


[?25l7[17;24r8[?25h[16;2H[3;1H[4mPrevious Entry:   305.91          [24m7[2;11H...There is 1 ICD CODE associated with this encounter.[16;1H
Enter [1mNEXT[22m Diagnosis : [K[J[?25l7[17;24r8[?25h[?25l7[17;24r8
[?25h
Would you like to add any Diagnoses to the Problem List? NO// No  NO7[1;24r8[19;1H[1;1H[J[2J[H[1m
[APAT/APPT/CLINIC:  THREE,PATIENT C  FEB 25, 2013@13:00               Clinic2[
22m
PROVIDER: ...Enter the provider associated with the CPT'S.....[4m
     CPT:                                                                   
[24m[4;2H[J[1m
[A        - - E N C O U N T E R  P R O C E D U R E S (CPT CODES) - -[22m[K[1
m
[A        - - E N C O U N T E R  P R O C E D U R E S (CPT CODES) - -[22m[K[4
m
No. CPT CODE  QUANTITY   DESCRIPTION                   PROVIDER             [J
[24m[?25l7[17;24r8[?25h[16;2H7[3;11H[4m...There are 0 PROCEDURES associated with this encounter.[24m[K
[16;1H[?25l7[17;24r8[?25h
Enter PROCEDURE (CPT CODE): [K[J[J7[1;24r8
  - - - - S o r r y   A b o u t   T h e   W a i t - - - -
This information is being stored or monitored by Scheduling
Integrated Billing, Order Entry, Registration, Prosthetics
PCE/Visit Tracking and Automated Med Information Exchange.

AMIE LINK OUT OF ORDER

Press RETURN to continue: 

Do you wish to see the check out screen? NO// No  NO[3;1H[1;1H[J[2J[H	 .S SDREF=$Q(@SDREF,SDDIR)
	                   ^-----
		At column 20, line 161, source module /home/softhat/VistA-Instance/r/SDAMA307.m
%GTM-E-RPARENMISSING, Right parenthesis expected


[?25l
[1;1H[1;1H[J[2J[H
[4m
[1m
[1;1HAppt Mgt Module[22m[4m               
[1;31HFeb 25, 2013@12:55:42          Page:    1 of    1 [24m[1;1H
Clinic: Clinic2