1# Print a test page using print-job 2{ 3 # The name of the test... 4 NAME "Print file using Print-Job" 5 6 # The operation to use 7 OPERATION Print-Job 8 9 # Attributes, starting in the operation group... 10 GROUP operation-attributes-tag 11 ATTR charset attributes-charset utf-8 12 ATTR language attributes-natural-language en 13 ATTR uri printer-uri $uri 14 ATTR name requesting-user-name $user 15 ATTR mimeMediaType document-format $filetype 16 17 GROUP job-attributes-tag 18 ATTR integer copies 1 19 20 FILE $filename 21 22 # What statuses are OK? 23 STATUS successful-ok 24 STATUS successful-ok-ignored-or-substituted-attributes 25 26 # What attributes do we expect? 27 EXPECT job-id 28 EXPECT job-uri 29} 30{ 31 NAME "Wait for job to complete..." 32 OPERATION Get-Job-Attributes 33 GROUP operation-attributes-tag 34 ATTR charset attributes-charset utf-8 35 ATTR language attributes-natural-language en 36 ATTR uri printer-uri $uri 37 ATTR integer job-id $job-id 38 ATTR name requesting-user-name $user 39 40 STATUS successful-ok 41 EXPECT job-id 42 EXPECT job-state WITH-VALUE >5 REPEAT-NO-MATCH 43 DISPLAY job-state 44 DISPLAY job-state-reasons 45} 46